aber an welcher stelle muss ich dann nun die critical section einführen?
so?
Delphi-Quellcode:
TTest = class(TObject)
private
FCS : TCriticalSection;
public
procedure test();
end;
procedure test();
begin
FCS.Enter();
try
{ ... }
finally
FCS.Leave();
end;
end;
oder so?
Delphi-Quellcode:
TTest = class(TObject)
private
public
procedure test();
end;
procedure test();
var
CS : TCriticalSection;
begin
CS.Enter();
try
{ ... }
finally
CS.Leave();
end;
end;
also lokal oder global???
sollte wohl noch dazu sagen, dass ich von einem thread, außerhalb der klasse, aus auf die test-methode zugreife.
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)