получить значение Delphi компонента из asm

[fbus]

всем привет. Вопрос такой..
можно ли как-то из ассемблерной вставки получить значение компонента (например Edit), тоесть не так:

var a:string;
     a:= edit1.text;
     asm
        mov eax,a
          .....
     end;

[Stilet]

mov eax,[a] - даст тебе указательна массив символов этой строки.

Ты луче скажи что делать буш с ним.

[fbus]

просто я постепенно осваиваю asm в делфе, потому как работаю программером частенько возникает необходимость ускорить те или иные процедуры, так вот собственно вопрос был в том можно ли как-то достать значение из edit'a не прибегая к промежуточному a:=edit1.text;

[Stilet]

Ну поскольку text это свойство в данном компоненте, то стало быть на нем сидит какая-то процедура обработки, которая получает строку из окна текста и передает ее как результат.

Можеш попробовать заменить это примерно так:

procedure TForm1.Button1Click(Sender: TObject);
var a:pchar;h:HWND;
begin
getmem(a,100);
h:=Edit1.Handle;
asm
  push 120;
  push a
  push h
  call GetWindowText
end;
caption:=a;

end;

Все равно в WIN API придеш, другие же методы хакерские, и смысла в них особого только кругозор развить.

[fbus]

понятно, спасибо, тему можно закрыть