Problem with TRec

[dcom67]

I can use TRec with no problems until i add windows to the uses , then it complains of a syntax error ,
try this  code with and without the windows , in the uses.

I kind of need the windows uses in because i want to be able to change the cursor , is there some other way ?

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs,windows;

type

  { TForm1 }
  TForm1 = class(TForm)
    procedure FormShow(Sender: TObject);
  private
  public
  end;
var
  Form1: TForm1;
implementation
{$R *.lfm}
{ TForm1 }

procedure TForm1.FormShow(Sender: TObject);
var
ImageRect : TRect;
begin
      ImageRect := Rect(24,24,1512,1512);
end;

[Blaazen]

If there's some duplicity, you can adress the right type specifically:

Code: Pascal  [Select][+][-]

1. R: types.TRect;
2. S: windows.TRect;

The same if there's conflict in function name Rect();.
I'm not on Windows so I can't test.

Note: there's declaration in unit classes.

Code: Pascal  [Select][+][-]

1. TRect=Types.TRect;

[dcom67]

If there's some duplicity, you can adress the right type specifically:

Code: Pascal  [Select][+][-]

1. R: types.TRect;
2. S: windows.TRect;

The same if there's conflict in function name Rect();.
I'm not on Windows so I can't test.

Note: there's declaration in unit classes.

Code: Pascal  [Select][+][-]

1. TRect=Types.TRect;

Ah Ok . Yah i want to keep using the Types.TRec  , as i already have a bunch of them in the code  I will try out  "R: types.TRect;"   thanks

[marcov]

Are you using an really old version? This difference should be fixed in 3.0.4 (and maybe even 3.0.2)

[jamie]

Put WINDOWS at the start of the USES list not at the end.

This way the compiler sees the WNIDOWS unit last when searching for TRECT. etc...

Search order for units are the last one in the list as the one that gets searched first

[rvk]

I can use TRec with no problems until i add windows to the uses , then it complains of a syntax error ,
try this  code with and without the windows , in the uses.

ALWAYS mention the exact error message.

But when you don't use Windows unit, you can use Rec() as function.
If you DO use Windows unit you'll get an error.

Code: [Select]

unit1.pas(35,23) Fatal: Syntax error, ")" expected but "," found
That's because Windows has a record Rec (which is NOT a function you can just use).

You can fix this by prefixing the Rec() function with Classes. (where it is defined).

Code: Pascal  [Select][+][-]

1. var
2.   ImageRect : TRect;
3. begin
4.   ImageRect := Classes.Rect(24,24,1512,1512);

[dcom67]

Ok Thanks for the Input guys

And I didn't know about that search order part