Forum: Object-Pascal / Delphi-Language
Delphi
by quendolineDD,
6. Apr 2009
Es ist einfach nicht gut, wenn eine Zählvariable einen globalen Scope hat. Die könnte ja überall geändert werden. Aus diesem Grund kommt da auch eine Warnung von Delphi.
Forum: Object-Pascal / Delphi-Language
Delphi
by quendolineDD,
6. Apr 2009
Geh doch einfach Schritt für Schritt mit F7/F8 selber durch. Setz dir einen Breakpoint und schau dir die Werte der Variablen an. Ein wenig Eigeninitiative kann man schon verlangen.
Forum: Object-Pascal / Delphi-Language
Delphi
by quendolineDD,
6. Apr 2009
Welche Zeile ist denn bei dir im Quellcode Zeile 208?
Schau dir doch einfach mal die Zeilen davor an. Meist liegt dort der Fehler.
Forum: Object-Pascal / Delphi-Language
Delphi
by quendolineDD,
4. Apr 2009
Doch. Und zwar schreibst du im OnClose-Event der Unit3 folgendes
Form1.SG_KONTAKTE.RowCount := Form1.SG_KONTAKTE.RowCount + 1;
Forum: Object-Pascal / Delphi-Language
Delphi
by quendolineDD,
4. Apr 2009
Weiterhin wäre es auch hilfreich, den "Fehler" bei seinem Namen und Erscheinungsbild zu benennen. Es ist immer äußerst hilfreich und auch meist aufgrund des Fehlernamens ersichtlich, woraus dieser resultiert.
Edit:
Wenn man im "Kontakt Hinzufügen"-Dialog auf abbrechen drückt, wird trotzdem der RowCount des Stringgrids erhöht.
Edit2:
Und die Variante mit erst den Pfad aus einer Datei holen...
Forum: Object-Pascal / Delphi-Language
Delphi
by quendolineDD,
3. Apr 2009
Erstmal etwas anderes
While (eof(datei)=false) do
begin
i := i + 1;
SetLength(Kontakte, i);
Read(datei, Kontakte);
end;
Du erhöhst i um jeweils 1. Damit schreibst du beginnend für i=1 in Kontakte den ersten Wert.
Außerdem würde ich dir gerne die Methoden LoadFromFile von TStringList (bzw. TStrings)...