La complétion ne reconnaît pas l'objet
Bon,
je suis débutant et comme d'habitude ça doit venir d'une boulette :lol: mais quand même, des fois j'ai l'impression que Lazarus perd la boule.
Voici le code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| function TSaneDev.DrawPNMtoForm(
rowcount, linecount: longint;
var Str: TStream;
var bmp: TForm): Boolean;
var
ct: integer;
B: string;
row: integer;
line: integer;
PixelRGB: array[0..2] of byte;
bytesread: longint;
begin
bmp.Height := linecount+10;
bmp.Width := rowcount+10; |
Le code ne compile pas avec le message
Citation:
.../sanedev.pas(295,7) Error: Unknown record field identifier "HEIGHT"
D'ou sort le record field ?
J'ai bien bmp qui est un paramètre de type TForm. Si je me place au niveau du . du premier "bmp" après "begin", la completion m'ouvre l'unité "form" et me place à la ligne
Code:
function FrmInitForm(rscID: UInt16): FormPtr; syscall sysTrapFrmInitForm;
:?
