Thema: Delphi GUI per DLL

Einzelnen Beitrag anzeigen

Benutzerbild von gsh
gsh

Registriert seit: 24. Okt 2004
1.542 Beiträge
 
Delphi XE Architect
 
#8

Re: GUI per DLL

  Alt 24. Jul 2005, 15:53
Wenn dann so:
procedure Button1Click(Sender: TObject); Außerdem musst du diese prozedure dem Button zuweissen:

Delphi-Quellcode:
procedure DLLFormShow; stdcall;
begin
  Form1 := TForm.Create(nil);
  Form1.Top := 0;
  Form1.left := 0;
  Form1.Width := 100;
  Form1.Height := 200;
  Memo1 := TMemo.Create(Form1);
  Memo1.Top := 100;
  Memo1.left := 0;
  Memo1.Width := 100;
  Memo1.Height := 100;
  Memo1.Parent := Form1;
  Button1 := TButton.Create(Form1);
  Button1.Top := 0;
  Button1.left := 0;
  Button1.Width := 100;
  Button1.Height := 100;
  Button1.Caption := 'FreeMe';
  Button1.OnClick := Button1Click; //Hier, weiss aber nicht ob des genau so heisst
  Button1.Parent := Form1;
  Form1.Show;
end;
Ungetestet

//edit: Fehler ausgebessert
Alex
"Sage nicht alles, was du weißt, aber wisse alles, was du sagst!" Matthias Claudius
"Wer sich über Kritik ärgert, gibt zu, daß er sie verdient hat." Tacitus
  Mit Zitat antworten Zitat