AW
Я знаю
Все так работают ,но производительность падает
Size: a a a
AW
AW
S
S
AW
S
AW
W
TDataExporterWorker = class(TThread)
protected
FOnExecute: TNotifyEvent;
procedure Execute(); override;
public
property OnExecute: TNotifyEvent read FOnExecute write FOnExecute;
end;
procedure TDataExporterWorker.Execute;
begin
if not Terminated then
begin
if Assigned(OnExecute) then OnExecute(Self);
Terminate();
end;
end;
AS
AW
RS
AS
AZ
AZ
N
N
AZ
М
AZ