Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Helmi,
1. Jan 2009
Oder:
var a,b,c,d:integer;
procedure TForm2.Button1Click(Sender: TObject);
begin
If not TryStrToInt(StringGrid1.Cells, a) or
not TryStrToInt(StringGrid1.Cells, b) or
not TryStrToInt(StringGrid1.Cells, c) or
not TryStrToInt(StringGrid1.Cells, d) then
ShowMessage ('Ungültige Eingabe');
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Helmi,
1. Jan 2009
Es müsste dann so heissen:
var a,b,c,d:integer;
procedure TForm2.Button1Click(Sender: TObject);
begin
try
a := StrToInt(StringGrid1.Cells) ;
b := StrToInt(StringGrid1.Cells) ;
c := StrToInt(StringGrid1.Cells) ;
d := StrToInt(StringGrid1.Cells) ;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Helmi,
1. Jan 2009
mach mal bitte einen screenshot deiner stringgrid
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Helmi,
1. Jan 2009
Hallo,
hast du auch die richtige Zeile ausgewählt?