Какой экземпляр Ready
протестирован в следующем коде и почему?
interface
type
TObject1 = class
...
public
property Ready: boolean read FReady write FReady;
end;
TObject2 = class
...
public
property Ready: boolean read FReady write FReady;
end;
implementation
var
Object1: TObject1;
Object2: TObject2;
...
procedure test;
var
Ready: boolean;
begin
Ready:= true;
with Object1, Object2 do begin
if Ready then ShowMessage('which one?');
end; {with}
end;