Delphi-Quellcode:
procedure TMyThread.Execute;
begin
while Not Terminated do
[U]procedure TForm1.Button1Click(Sender: TObject);[/U]
var
i : Integer;
w : hWnd;
begin
__________________________________________________ ______________________
kann es sein das der unterstrichene butten da nicht hingehört und deshalb das programm nicht laufen will ?
mfg whitey