StringGrid mit string füllen geht nicht

[EWeiss]

Zitat:

Ausserdem steht doch im S0 was nettes drin, wenn du meinen Code übernimmst

gruss

[stay]

Ich muss euch nochmal belästigen, Thema Debugger..
Mein Programm hängt sich in unregelmäßigen Abständen auf. Immer bei der Umwandlung von Hex in Dezimal. Ich könnte jetzt von Try Methode bis hin zum Max Länge gucken, dass ich alles absichere. Allerdings, wenn ich es richtig verstanden habe, kann ich im Debugger sehen, wo der Fehler war? Das wäre natürlich sehr elegant. Wie komme ich dort ran?

Leider habe ich die Fehlermeldung schon weggeklickt, aber er zeigt halt immer einer der 4 Variablen Umwandlung an.

Gruß

[p80286]

Zeig doch mal den Sourcecode, die Beschreibung ist doch ein wenig unpräzise.

Gruß
K-H

[Hobbycoder]

Zitat von stay:

Ich könnte jetzt von Try Methode bis hin zum Max Länge gucken, dass ich alles absichere.

Und du tust auch gut daran es zu machen.

Debugger ist doch noch so schwer. Schon mal eine Haltepunkt gesetzt? Dann mal der Maus auf eine Variable, und Hint betrachten. Oder Cursor auf Variable und dann STRG+F5. Dann vielleicht mal mit der rechten Maustaste das Popup betrachten.
Manchmal ist es auch hilfreich sich für das debuggen eine Zwischenvariable zu setzen. Und natürlich möglichst kurze und kleine Proceduren und Funktionen, und nicht versuchen alles in einer Prozedur zu erledigen, da lauern die meisten Fehler. Mit kleine Proceduren lässt sich das auch besser und übersichtlicher absichern.

[stay]

Ok, dann werde ich später alles absichern.

Haltepunkt setzen macht wenig Sinn, wie ich grade merken musste.
Es ist eine zyklische Abfrage alle 400ms. Der Fehler kommt alle 10-20 Minuten, ich muss ja bei der Haltemarke immer weiter drücken.


[zyklische abfrage]
popen (F,'i2cget -y 1 0x48 0x40''R');
Readln (F,S0)
popen (F,'i2cget -y 1 0x48 0x41''R');
Readln (F,S1)
popen (F,'i2cget -y 1 0x48 0x42''R');
Readln (F,S2)
popen (F,'i2cget -y 1 0x48 0x43''R');
Readln (F,S3)

[Ausgabe in StringGrid...]

A0 := StrToInt(S0);
A1 := StrToInt(S1);
A2 := StrToInt(S2);
A3 := StrToInt(S3);

[Bei den unteren 4 hängt er sich ab und zu auf]

[himitsu]

Die Dateien werden auch wieder geschlossen?

Man kann einem Haltepunkt auch eine Bedingung geben.
Und im Notfall baut man sich einen Zweizeiler ins Programm.

Delphi-Quellcode:

if .... then
  Beep;  << Haltepunkt hier drauf

Und wenn das Programm hängt, dann kann man auch den Debugger manuell anhalten und im Stacktrace und den jeweiligen lokalen Variablen schauen, wo es hängt.

[stay]

Was meinst du mit geschlossen? :/ Ich habe die Befürchtung, nein werden sie nicht.

[stay]

Hallo himitsu,

so wie es aussieht, lag es wirklich an dem nicht schließen.

Es tut mir wirklich leid, dass ich mit so Anfängerfragen komme, ich muss mir die Programmsprache selbst beibringen... :/ und da übersieht man leicht kleine entscheidene Details.