Colleagues to write a system, some FORM in my native opened by DELPHI, attribute OldCreateOrder=True, but in my colleagues there open OldCreateOrder=False, all source code, DELPHI version (7.0), the same excuse me what reason be?

CodePudding user response:

CSDN, good cold ah?

CodePudding user response:

No sentiment, only yourself

CodePudding user response:

Unit Forms, {$IF DEFINED (CLR)} position step through a look at two different computer whether

Procedure TCustomForm. DefineProperties (Filer: TFiler);
The begin
Inherited DefineProperties (Filer);
Filer. DefineProperty (' PixelsPerInch 'nil, WritePixelsPerInch, not IsControl);
Filer. DefineProperty (' TextHeight 'ReadTextHeight WriteTextHeight, not IsControl);
Filer. DefineProperty (' IgnoreFontProperty ReadIgnoreFontProperty, nil, False);
{$IF DEFINED (CLR)}
Filer. DefineProperty (' OldCreateOrder IgnoreIdent, nil, False);
{$IFEND}
end;