hmmm.... irgendwie will er nicht...
Code:
[Fehler] UAnsichtsoptionen.pas(128): Undefinierter Bezeichner: 'goVertLine'
[Fehler] UAnsichtsoptionen.pas(128): Inkompatible Typen: 'TGridOption' und 'Integer'
[Fehler] UAnsichtsoptionen.pas(128): Inkompatible Typen: 'TGridOption' und 'Integer'
[Fataler Fehler] PCM.dpr(12): Verwendete
Unit 'UAnsichtsoptionen.pas' kann nicht compiliert werden
also die prozedur sieht folgendermaßen aus:
Delphi-Quellcode:
procedure TFormOptionen.CheckBox1Click(Sender: TObject);
begin
if (Sender As TCheckbox).Checked then
begin
FormHaupt.StringGrid1.Options := FormHaupt.StringGrid1.Options + [goVertLine];
end
else
begin
FormHaupt.StringGrid1.Options := FormHaupt.StringGrid1.Options - [goVertLine];
end;
end;
was macht es eigentlich für einen unterschied, ob man
Code:
if (Sender As TCheckbox).Checked then
oder
Code:
if (CheckBox5.checked= True) then
nimmt?
naja wichtiger ist aber erst mal das problem mit dem optionen...
Weiß jemand, woran das liegt?
muss ich vielleicht erst irgendwo einstellen, dass man während der laufzeit die optionen ändern kann?
Gruß, dopeline