[delphi] denkfout? met colwidths

[Verwijderd]

Volgens mij is dit echt een dummy vraag. Ik heb overal al gekeken, maar ik maak volgens mij een denkfout, en kom er dus niet uit.

Ik heb op mijn form een stringgrid staan. Hiervan wil ik de breedte van de kolommen (2 kolommen) aanpassen. Kolom 1 een breedte van 90, en kolom 2 een breedte van 210.

Ik gebruik dus de volgende code:

code:

procedure TForm1.FormCreate(Sender: TObject);
begin
with stringgrid1 do

Colwidths[0] := 90
Colwidths[1] := 210
end;
end.

maar dan krijg ik een foutmelding

Unit1.pas(72): Missing operator or semicolon

Maak ik hier nu een denkfout?

[Verwijderd]

Je bent de puntkomma's vergeten.

[Verwijderd]

Op vrijdag 12 juli 2002 15:02 schreef Los_Bastardos het volgende:
Je bent de puntkomma's vergeten.

Als ik de puntkomma's erachter zet, dan krijg ik de volgende foutmelding:

Unit1.pas(71): Undeclared identifier: 'ColWidths'

[Verwijderd]

denk dat het ColWidth is en niet ColWiths ??

[Verwijderd]

Op vrijdag 12 juli 2002 15:11 schreef eye-d het volgende:
denk dat het ColWidth is en niet ColWiths ??

Nee, want als ik 1 kolom wil aan passen :

code:

procedure TForm1.FormCreate(Sender: TObject);
begin

 with stringgrid1 do


ColWidths[0]:= 90;
end;
end.

dan werkt het wel.

En er zitten meer kolommen in de stringrid, het is dus ook niet dat het komt doordat er te weinig zijn.

met een "for" kan ik alle kolommen aanpassen, en dan werkt het ook. Maar ik wil graag dat kolom 1 een andere grootte heeft dan kolom 2 enz.

[Verwijderd]

Probeer het volgende:

code:

procedure TForm1.FormCreate(Sender: TObject);
begin
   with stringgrid1 do
   begin
    Colwidths[0] :=  90;
    Colwidths[1] := 210;
   end;
end.

Je was een begin statement vergeten.

[Verwijderd]

moet na je "with" toch een "begin" komen als je meer dan 1 opdracht uitvoert ??

too late

[whoami]

Syntax errors moet je toch echt wel zelf kunnen oplossen.
Het toepassen van een goede coding-style, wil daarbij ook nog wel eens helpen. (In de P&W FAQ hebben we er zelfs een item aan gewijd).