Send string til TEdit

var
  S: String;
begin
  S := 'Davs!';
  Form1.Edit1.Text := S;
end;

Noget i den retning du søger?

Eller er det noget SendMessage-ting du søger? Ikke sikker på at jeg er helt med på dit spørgsmål...

edit-feltet er i et andet program

OKI så skal du have WindowsHandlet til dit edit felt. Ellers kan du ingen ting gører med det ...

Jens B

Ka du lave eksemple

Jeg fandt selv ud af det, jeg skulle bare skrive:

Procedure SendStringToEdit( COnst S: String );
Var
  wnd,edit: HWND;
  i  : Integer;
Begin
    wnd := FindWindow( 'TForm1', nil );
  If wnd = 0 then
    Exit;

  edit := FindWindowEx(w,0,'tEdit','Edit1');

  if edit = 0 then
    Exit;

  for i:= 1 to length(S) do
    postMessage( edit, WM_CHAR, Ord(S[i]), 0 );
End;