"" ist kein gültiger Gleitkommawert

[DeddyH]

Hallo und Willkommen in der DP ,

ich verstehe zwar den Sinn Deiner Schleife nicht, aber was passiert, wenn Du statt StrToFloat StrToFloatDef oder TryStrToFloat verwendest? Wenn 0 die Vorgabe sein soll, würde sich eher StrToFloatDef anbieten.

[himitsu]

@DeddyH:
Das unterdrückt zwar die Fehlermeldung, aber nicht die Ursache.
Wenn er wirklich alle entsprechenden Felder/Zellen mit 0 belegt hat, dann greift er hier ja vermutlich auf ein "falsches" Feld zu.

[Zackzack]

b wird vom Benutzer definiert er kann entscheiden wieviel zeilen es gibt.
Er fragt dann nach jedem Enter halt alle positionen ab und schreib sie in das Array. So war zumindestens die Idee^^
Try und Def klappen auch nicht da meint er das es keine überladene Version gibt.

[DeddyH]

Nochmal: der Benutzer sagt z.B. b = 100, und Du erstellst dann 100 Zeilen und belegst die 2. Spalte mit 0 vor? Dann kannst Du doch auch direkt auf die Zelle zugreifen und brauchst keine Schleife.

[ConnorMcLeod]

Beim Eintippen wird der vorhandene Wert gelöscht und durch den getippten Wert ersetzt. Nach dem Löschen (und vor dem Ersetzen) steht kurzfristig ein Leerstring drin. Dieser erzeugt den Fehler beim Versuch, das in eine Zahl umzuwandeln.

Also:

Delphi-Quellcode:

if ('' = StringGrid1.Cells[1,b]) then
begin
  ... := 0;
end
else
begin
  ... := StrToFloat(StringGrid1.Cells[1,b]);
end;

[DeddyH]

Oder eben kürzer mit StrToFloatDef (wobei ich mir nicht sicher bin, ob es das unter Delphi 5 schon gab).

[Satty67]

Wie DeddyH vorgeschlagen hat:

StrToIntDef gibt es ab Delphi 5 (ziemlich sicher) und sollte das Problem mit Vorgabewert 0 lösen oder gleich eine leere Zelle mit 0 füllen.

€: geht ja um Floats... bei StrToFloatDef bin ich mir aber schon wieder unsicher? Aber F1 sollte das klären...

Delphi-Quellcode:

function StrToFloatDef(AString : String; Default : Double) : Double;
begin
  try
    Result := StrToFloat(AString);
  except
    Result := Default; // evtl. nur EConvertError abfangen
  end;
end;

In den neueren Delphi Versionen ist das besser gelöst, da es in der IDE keine Exception wirft, weis aber gerade nicht wie

[Zackzack]

So es läuft alles ! StrToFloatDef war es dann am Ende!
Danke für die schnelle Hilfe!

[shmia]

Zitat von Zackzack:

b wird vom Benutzer definiert er kann entscheiden wieviel zeilen es gibt.

Ich glaube du brauchst einen Kurzlehrgang über globale und lokale Variablen und weshalb man globale Variablen nach Möglichkeit vermeiden sollte.

1.) verwende wann immer möglich lokale Variablen
lokale Variablen dürfen einen kurzen Namen haben, der z.B. nur aus einem Buchstaben besteht.
2.) bevorzuge Variablen im Formular gegenüber globalen Variablen
Variablen, die nicht lokal sind dürfen keinen kurzen Namen haben und beginnen mit Prefix "F"; das steht für Field.

Delphi-Quellcode:

TForm1 = class(TForm)
...
private
  // korrekte Variablen
  FAnzahlSpieler: Integer;
  FIniDateiname : string;
  b : Integer;  // Falsch, Name zu kurz, Prefix fehlt
public
end;

[Zackzack]

danke für den Tipp werde es direkt umsetzen !
ist wohl besser so