Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.312 Beiträge
 
Delphi XE2 Professional
 
#11

Re: Berechnungsfehler aus Stringgriddaten

  Alt 5. Jan 2009, 18:16
ja - habs danach auch gesehen

mal was anderes:

Ist das beabsichtigt, dass 3 mal hintereinander die gleiche Zelle gelesen wird:
Delphi-Quellcode:
       l:=strtofloatdef(stringgrid1.Cells[2,x],0);
       b:=strtofloatdef(stringgrid1.Cells[2,x],0); //müsste das nicht [3,x] heissen?
       h:=strtofloatdef(stringgrid1.Cells[2,x],0); //müsste das nicht [4,x] heissen?
[Edit]
Ich hab mal diese Zeile von:
fahrzeuge:=max (ceil (g/mg), ceil (v/mv)); auf
fahrzeuge:=max (ceil (gewicht/mg), ceil (volumen/mv)); geändert. Jetzt kommen die Fahrzeuge - aber ich hab jetzt nicht geprüft ob die Rechnung richtig ist.

[Edit2]
hab dein Button3 OnClick-Ereignis leicht optimiert:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var
  z, i:integer;
begin
edit1.clear;
edit2.Clear;

for i := StringGrid1.FixedCols to StringGrid1.ColCount - 1 do
  begin
    for z := StringGrid1.FixedRows to stringgrid1.rowcount - 1 do //Fixedrows der ordnungsheitshalber ergänzt
      stringGrid1.cells[i,z]:=('');
  end;

memo1.clear;
stringgrid1.row:=1;
stringgrid1.col:=0;
stringgrid1.setfocus;
end;
Wie du siehst, gibts jetzt eine 2 dimensionale Schleife
die erste schleife (i) läuft über die Spalten - die zweite Schleife (z) über die Zeilen
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat