Hi All,

http://hotfile.com/dl/100225293/35136c1/frog_game.tar.gz.html

I am modernising the SDL unit by replacing all of the records with classes. This should avoid warnings.

basically all

whatever = record
   x : integer;
   // blah blah blah
end;

becomes

whatever = class
   public
     x : integer;
     // blah blah blah
end;

and then

var
   whatever1 : whatever;
begin
   // new(whatever1);
   // becomes
   whatever1 := whatever.create;
...
uFixedWidthFonts.pas(98,21) Error: Unknown record field identifier "CREATE"
uFixedWidthFonts.pas(177,17) Error: Operator is not overloaded
uFixedWidthFonts.pas(182,16) Error: Unknown record field identifier "FREE"
uFixedWidthFonts.pas(253) Fatal: There were 3 errors compiling module,
stopping

and Lazarus does not understand how to do a

whatever1.whatever.create;
nor a
whatever1.free;

Best Regards,
pew

maybe because your classes don't descend from any other class that owns a "create" or "free" methods...

If you use classes, out of the top of my head, I could say that an instantiation, like

var C: MyRecordConvertedToClass;
...
C.X = 10;
C.Y = 20;

should be enough.

Otherwise, you had better define a base class, with constructor and destructor, overriding them as needed in every derived class.

Anyone correct me if I am wrong in this statement...

Cheers, A.

2011/1/28 Pew (piffle.the.cat) :

I am modernising the SDL unit by replacing all of the records with classes. This should avoid warnings.

Hi,

try to see these links:

http://www.pascalgamedevelopment.com/forumdisplay.php?26-JEDI-SDL http://www.freepascal-meets-sdl.net/

Regards,
Kjow