Thema: Delphi Stringgrid Col vergleich

Einzelnen Beitrag anzeigen

Benutzerbild von 5etH
5etH

Registriert seit: 4. Mär 2008
Ort: Giessen
217 Beiträge
 
Delphi 2007 Professional
 
#5

Re: Stringgrid Col vergleich

  Alt 10. Apr 2008, 14:36
also deswegen die cols weil es um den einkauf bzw verkauf geht in den rows stehen die Zeitinterwalle der einkäufe bspw. monate in den cols die waren damit man die einkaäufe in die felder eintragen kann es geht um die abrage des fixed cols nicht cols algemein

hier einmal das gesammte programmfragment
Delphi-Quellcode:
for I := 1 to fint.StringGrid1.colcount -1 do
begin
zwisch := fint.StringGrid1.Cells[i,0];
if zwisch[1] <> inttoStr(i) then // Zugriffsverletzung hier
begin

fint.StringGrid1.ColCount := fint.StringGrid1.ColCount +1;
fint.stringgrid1.Cells[fint.stringgrid1.colcount-2,0] := inttostr(i)+ '. ' + edit2.text;
fint.StringGrid2.ColCount := fint.StringGrid2.ColCount +1;
fint.stringgrid2.Cells[fint.stringgrid2.colcount-2,0] := inttostr(i)+ '. ' + edit2.text;
fint.StringGrid3.ColCount := fint.StringGrid3.ColCount +1;
fint.stringgrid3.Cells[fint.stringgrid3.colcount-2,0] := inttostr(i)+ '. ' + edit2.text;
fint.StringGrid4.ColCount := fint.StringGrid4.ColCount +1;
fint.stringgrid4.Cells[fint.stringgrid4.colcount-2,0] := inttostr(i)+ '. ' + edit2.text;
fint.StringGrid5.ColCount := fint.StringGrid5.ColCount +1;
fint.stringgrid5.Cells[fint.stringgrid5.colcount-2,0] := inttostr(i)+ '. ' + edit2.text;

end;//end if
end; //end for
Manuel
  Mit Zitat antworten Zitat