Hallo,
ich verstehe nicht ganz warum mein Integer, den ich in der FormMain als Public deklariert habe und im ButtonClick Event ihm einen Wert zuweise im Thread immer wieder 0 ist?
Delphi-Quellcode:
private
iTest : Integer;
tformmain.onbuttonclick
var
thread : TTestThread;
ibuf : Integer;
begin
iTest := strtoint(edit1.text);
thread := TTestthread.Create(True);
thread.freeonterminate := True;
thread.Resume;
end;
procedure ttestthread.execute;
var
iTestInThread : Integer;
begin
iTestInThread := Formmain.iTest;
showmessage(iTestInThread) = 0...
end;
Wie kann ich auf den Wert zugreifen?
Danke