А зачем ты делал вот это объясни:
Цитата:
Сообщение от Andrey53
Код:
TNewThread = class(TThread)
public
procedure DoConnectMySql;
protected
procedure Execute; override;
end;
procedure TNewThread.Execute;
begin
inherited;
Synchronize(DoConnectMySql);
end;
|