Deutsches Lazarusforum

Hallo Ihr Lieben,
danke für Eure Gedanken und Ideen, die ich aber alle aus diversen Gründen für mich verworfen habe.
Die Lösung die ich jetzt favorisiere habe ich angehängt.
Sie kapselt die originale Format-Funktion in eine neue FormatEx-Funktion und dort in einen Try..Except-Block.
Wird innherhalb ...

Im grunde ganz einfach: wenn du auf den ordner zugreifen willst erstellst du die Datei. Wenn du fertig bist löschst du sie wieder. Da da die Dateisystem zugriffe vom OS serialisiert werden kanns niemals passieren das zwei Prozesse gleichzeitig den lockfile erstellen können.

Das genau war ja mein ...

An fmShareExclusive hatte ich auch als erstes gedacht.
Da du aber geschrieben hast; "da auf gleichen Ordnern operieren kann", habe ich das nicht erwähnt.
Ordner kann man so wohl nicht locken.

Vielleicht hatte ich mich unglücklich ausgedrückt. Es geht um ein "privates" Lock zwischen zwei ...

Hier ergibt sich aber ein wirklich blödes Problem mit mehreren Anwendungen unter Linux: Sollte eine Anwendung sterben, während die Datei geöffnet und existent ist, bleibt das System für immer gesperrt. Ich kümmere mich später darum.



function LockFolder(const ALockFolderName : String; out ...

Nach etwas Gesuche habe ich eine Lösung gefunden, die sowohl unter Windows als auch unter Linux funktioniert.

Um das nachfolgende Beispiel zum Laufen zu bekommen erzeugt man eine neue Anwendung und setzt einen Button und zwei Memos auf das Formular.
Anschließen kopiert man den Quelltext in die ...

Vielleicht könntest du die Technik von uniqueinstance übernehmen?

Oder einfach ein Lockfile? Kommt halt drauf an, wie kritisch das Ganze ist.


Vielen Dank für die Hinweise, ich hatte schon beides probiert zunächst mit durchwachsenem Erfolg.
Zu uniqueinstance.
Hier erscheint mir der Overhead ...

Ich habe auch schon damit versuche gemacht, hier findest du ein paar Beispiele: https://github.com/sechshelme/Lazarus-X11-Examples/tree/master/87_-_Diverses
Die Beispiel verwendet alle FPC eigene Funktionen.

Hmm, das einzige was da ungefähr passt ist
https://github.com/sechshelme/Lazarus-X11 ...

Hallo Ihr Lieben,
ich arbeite gerade an
- einer Konsolenanwendung,
- die unter Linux laufen wird und
- die in mehreren Instanzen gestartet werden kann und
- da auf gleichen Ordnern operieren kann.
Etwas konkretisiert gibt es Unterverzeichnisse für bestimmte "Objekte", in denen die Dateien nicht ...

Ist der Aufwand das wirklich wert?

Die Funktion 'format' habe ich vor längerer Zeit ausprobiert - es war mir einfach zu aufwändig. Nicht nur, dass da Fehler zur Laufzeit möglich sind, da jedesmal die Formatierung einzugeben ist einfach nervig. Ich muss viele Zahlenwerte mit Beschreibung ...

Ist der Aufwand das wirklich wert?

Die Funktion 'format' habe ich vor längerer Zeit ausprobiert - es war mir einfach zu aufwändig. Nicht nur, dass da Fehler zur Laufzeit möglich sind, da jedesmal die Formatierung einzugeben ist einfach nervig. Ich muss viele Zahlenwerte mit Beschreibung sauber ...

Vielen Dank für Eure Beiträge und Gedanken!
Vorhin hatte ich die Idee, ob es nicht möglich sein könnte ein Plugin für die Lazarus-IDE zu basteln, welches nach dem Kompilieren durch den Pascal-Code läuft und alle Stellen in denen die Formatfunktion mit einem konstanten Formatstring aufgerufen wird ...

Würde ich lösen, indem ich mir eine (bzw. mehrere) sichere Funktionen bauen würde, die das ganze typsicher machen:
Für die Funktion FormatError schreibt man dann noch Unittests, damit auch da drin nichts schiefgeht.


Das ist mir deutlich zu unflexibel, es läuft dann darauf hinaus mehrere solcher ...

Hm, ich habe nie mit Pascal produktiv programmiert und kenne dieses format() auch erst seit kurzem und frage mich in deinem Problem, warum ihr das so macht. Weil das ganze Ergebnis ein String sein soll und einzelne Elemente in einem Writeln() nichts bringen. Ich glaube das format() gibts auch in ...

Hallo Ihr Lieben,
ich hoffe Ihr seid alle gut ins neue Jahr gestartet!

Obwohl ich ja schon sehr lange in Pascal, Delphi und nun Lazarus programmiere habe ich doch eine ziemlich grundsätzliche Frage, die mich in einem aktuellen Projekt ziemlich stört und vielleicht gibt es dafür eine schöne Lösung ...

Manchmal steht man sich selber im Wege und wenn das Problem gelöst ist, wundert man sich: Warum nicht schon immer so?
Oft will man, dass ein Thread nicht 100% seiner Zeit die CPU belastet, sondern nur alle paar Millisekunden etwas macht.
Das sieht dann so aus:
procedure TMyThread.Execute;
begin ...