Deutsches Lazarusforum

Zvoni hat geschrieben: Di 24. Feb 2026, 13:59 So wie ich es verstehe, würde das sowieso nen Compiler-Fehler erzeugen.
Wie ich das Beispiel von Mathias verstehe, geht multiline nur per "Backtick", nicht mit einfachem Singlequote
Unbenannt.PNG

So hab ich das auch verstanden und direkt "falsch" vorgemacht

Gibt es einen Compiler Schalter wo man das abdrehen kann ?

Berechtigte Frage!

Linker Bildschirm IDE, rechter Chat.
Die frage warum ich die Chat-Nachricht nicht gesendet habe, beantwortet sich ab und an mit compilererror.

Wenn jetzt eine Zeichenfolge davon betroffen ist, findet man den fehler ...

run
compile many Modes..

Dort habe ich meine x32|64 Releases und den Debug zur auswahl.
letzterer wird nicht ausgewählt und es wirft mir die dateien in den angegebenen Pfaden der ausgewählten Build modes aus.

Verstehe ich dich richtig, dass du diesen prozess verkompliziert hast?

Gruß

genau: beim ändern der Form wird P1 verkleinert (da ist auch ein Grid -zum Suchen- drin)
über den Splitter soll das Grid verkleinert werden und P3 nach oben geschoben werden.
Da P3 eine feste Höhe hat, soll gleichzeitig die Form verkleinert werden.

Mit MinHeight und MinWidth habe ich schon ...

ich verstehe das richtig?

beide Funktionen sollen die größe der Form anpassen.
Form größe ändern, P1 ändert sich mit.
Splitter herumschieben, P1 bleibt gleich, P2 und Form ändern sich?

E:
oder anders gesagt,
P1 wird über die Form geändert, das Grid über den Splitter, P3 bleibt immer gleich?

ich hab mal eben bei mir über eine unit geschaut:

....
SoftFlow := False;
HardFlow := False;

ComPort1.Config(BaudRate, DataSize, Parity, Stopbits, SoftFlow, HardFlow);
Sleep(200);

(* Datenempfang starten *)
ComPort1.RTS := True;
ComPort1.DTR := True;
Timer1.Enabled := True;

mir fällt ...

Ich verwende
https://wiki.lazarus.freepascal.org/UniqueInstance
Da kannst du dir aussuchen, ob das bestehende oder neue Programm wieder geschlossen werden soll.

Das schließen unterbinden ist natürlich die schönere Lösung.

Kurz mal noch zu dem Thema Ressourcen in großen Projekten.

Ich habe vor ~5 Jahren einmal mit Unity einen Videoguide gemacht, welcher von Unity selbst war - kostenlos.
Man hat halt wirklich vieles, was dort einfach abgebildet ist. Oft eher schlecht als recht, wenn man Performance einmal in Betracht ...

Das teuerste ist immer ein IO auf Ebene des Filesystems, das lernt man in allen DB Admin Kursen als erstes. Deswegen ist auch immer zu überlegen wie und was man wirklich loggen muß.
ist klar - das erste Provisorium ist aber auch immer das permanenteste. :lol:

Ist es nur Applikationsspezifisch ...

Wird dir ein
DebugLogger.OpenFile/CloseFile angeboten?

Wird es mir nicht - finde ich aber raus, ob und wie es geht.

Noch als Zusatz:

DebugLogger.CloseLogFileBetweenWrites:=True;
Das reiht sich in die anderen beiden Ergebnisse ein. ~4min

Im Fazit bin ich mit meiner Applikation wohl am Limit ...

Kurz einmal verwertbare Ergebnisse, dass man hier auch etwas damit anfangen kann.
tryExcept: 264047 ms
FileExists: 269812 ms
Filestream schreiben: 2516 ms
LazLogger: 312 ms
Lesen ist noch nichtsaussagend, aufgrund meiner Testumgebung.
Auf einer HDD ist hier Faktor 1,6 mehr im gegentest gewesen ...

Ich hab eben mal noch weiter gegengetestet.
Jetzt ist so ein test natürlich recht kurz gehalten und wird von jeglichem Flash akzeptiert.
auf einer HDD die hier noch zum test vorhanden war sind es aber schonmal 600ms zeitversatz. hier kann aber immernoch OS und flash der HDD (in dem fall vorhanden ...

Nur so eine Frage - warum nicht LazLogger oder MultiLog ? Die sind in sich optimiert und der LazLogger ist in Lazarus auch vorhanden und wird deswegen auch entsprechend gepflegt.

Es gibt sogar Programme, wo ich beides zugleich verwende. LazLogger um aktuelle Ereignisse zu dokumentieren (Console ...

Ein Try/Except?

Aircode

Try
s:=TFileStream.Create(logfile,fmOpenWrite);
Except
On EFOpenError Do s:=TFileStream.Create(logfile,fmCreate);
End;
https://www.freepascal.org/docs-html/rtl/classes/tfilestream.create.html

If the file could not be opened in the requested mode, an EFOpenError ...

Moin,

aktuell logge ich aus allen möglichen richtungen in eine Textdatei.
Das Funktioniert ohne Probleme mit SSDs, bei HDDs kann es aber schon mal zu problemen führen wenn das I/O-delay im dreistelligen ms-Bereich ankommt.


if FileExists(logfile) then
stream := TFileStream.Create(logfile ...