Deutsches Lazarusforum

ich denke ich habe das Problem gelöst.
Wenn ich einen Haltepunkt im Programm gemacht habe und mit dem Cursor auf die
Variable gegangen bin, so hat er mir den falschen Wert angezeigt.
Ich habe jetzt die Variablen in einem Label ausgegeben.
Jetzt stimmt auch der Wert.
Ganz schön Blöd.
Da muss man ...

Könnte es sein, dass du einfach falsch misst? Wie machst du es denn ohne Debugger?
Der Code, den du uns zeigst, hat nur eine Möglichkeit, dass iart und indarb unterschiedlich sind und das ist wenn indarb >= 1000 ist, soweit ich das sehe. Allerdings ist iart global deklariert?

iart:=iart+1;
if ...

Das ist ziemlich wenig Information.

Vllt. hier: https://forum.lazarus.freepascal.org/in ... ic=34275.0

@Anfänger33: Gib bei so etwas immer das Betriebssystem und die Lazarus Version an, sonst kann man da nicht viel sagen.

Schau doch mal wo das genau passiert.
Am Anfang der Meldung steht doch z.B. unit1.pas(18,12)

unit1.pas(18,12) Error: Forward declaration not solved "FindAllFiles(const AnsiString;AnsiString;Boolean):TStringList;"

Wahrscheinlich hast du irgendwo versehentlich eine solche Deklaration stehen.

Ich habe mir gestern jedenfalls alles mal runtergeladen, aber ich weiß nicht, ob es das der Mühe wert war. Im Code wimmelt es nur so von "goto"s, und noch schlimmer, in jeder Datei steckt eine Abhängigkeit von Windows. Das kostet noch viel Mühe, das alles zu modernisieren und zum Laufen zu bringen ...

Ich habe den Herrn grade mal angeschrieben, zwecks Copyright/Urheberrecht.... :wink:
Mal gucken ob da was zurück kommt.....


Ich fürchte nicht viel, der ist vermutlich zu alt oder schon bei N. Wirth. :wink:
Müsste man die Codesammlung für die Nachwelt sichern?
Wie sicher ist das auf archive ...

Naja, da wäre ich jetzt pragmatisch. Wo kein Kläger, da kein Richter!
Der Herr wäre jetzt 85, falls er noch lebt.
Ich kann mir nicht vorstellen, dass jemand wegen der Verwendung von ein paar Snippets davon ein Fass aufmacht.
Ich glaube, der würde sich freuen!

Manchmal ist es erhellend, einfach mal zu schauen was drin ist:
@fliegermichl: Du hast in dem Zip deine ganzen gesammelten Werke reingepackt. Das war bestimmt keine Absicht?

Mit einem TSpeedButton?

Gezeichnet wird in OnPaint, alles andere ist undokumentiertes Verhalten.
Das war schon immer so. Ich glaube auf Mac sieht man da auch nichts.

Anfänger33 hat geschrieben: So 20. Apr 2025, 15:05 In Excel kann man mit Auto-Filter seine Daten in den Spalten sortieren.
Gibt es ein solche Funktion auch in Lazarus?

Da müsstest du schon sagen in welchem Zusammenhang.
"Einfach so" wohl eher nicht, aber mit SQL kann man alles filtern und sortieren.

Könnte auch an Blankweg und Blankdazu liegen.
Length <> UTF8Length.
Schwer zu sagen.

Es ist auch das "const". So ist das definiert in der Unit fgl und so soll man es machen.

etc.