Deutsches Lazarusforum

*g*
Ja das sollte schon funktionieren, ich versuche halt info's zu sammeln

Hab mal ein Form mit
gemacht, da ist dann alles I.O.

OK, bei nem Bevel ist es auch so,.. Die differenz sieht sehr stark nach der "Höhe" meiner Form Titelleiste aus, und Tatsache mache ich folgenden Code procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin label3.caption := format('%d %d', [x, y]); end; sieht man au...

Servus zusammen, ich hab hier grad so einen WTF Moment. Ich bin unter Linux Mint Mate 21.3 mit Lazarus 3.99 (gehohlt via git pull heute um 11:35) Man nehme ein leeres Projekt, plaziere irgendwo eine TPaintbox und sorge dass folgender Code passt (oder lädt den in der Anlage runter): Procedure TForm1....

Also ich habe ettliche solcher Units die ich auf fast alle meine selbstgeschriebenen Programme verteille. Da ich grundsätzlich keine Binaries auf meiner Platte habe werden alle Programme die ich nutze beim Starten durch meine Scripte automatisch gebaut und dann gestartet (zum Glück ist der FPC-Compi...

@Matthias
und ich hab mir eine GIT_Gui für Linux und Windows gebaut die auf den ersten blick wie Tortoise Git aussieht und in Caja integriert ist

@photor Das funktioniert überall so. Ich habe ein Paswortfreies SSH Schlüsselpaar auf meinem Github Account und meinem Laptop (egal ob Windoof oder Linux) und schon kannst du ohne PW eingaben Pushen nach belieben ;) @wennerer Du willst quasi Tortoise Git funktionen in der Gui haben, oder verstehe da...

Ich meinte den Aufruf von:

InstanceRunning

Der erstellt im Hintergrund den Server

*g*,
es ging mir nicht um Codierrichtlinen, den die sind ja wie Religion, mir ging es eher um "sachgemäße" Benutzung. Nur weil etwas funktioniert, heist es nicht dass es Richtig ist.

Aber Danke, setze es auf gelöst.

Naja in dem Beispiel das funktioniert erstelle ich alles noch deutlich for Form.Create, also meinst du eher zu Spät ...

Ahh, wenn man es in der .lpr Datei macht, dann scheint es zu gehen: Program project1; {$MODE objfpc}{$H+} Uses {$IFDEF UNIX} cthreads, {$ENDIF} {$IFDEF HASAMIGA} athreads, {$ENDIF} Interfaces, // this includes the LCL widgetset Forms, unit1 { you can add units after this } , UniqueInstanceRaw, Uniqu...

Hallo Zusammen, ich habe eine Anwendung geschrieben, welche "normalerweise" nicht mehrfach gestartet werden soll => Klarer Fall für UniqueInstance. Wenn ich nun aber meine Anwendung Teste, dann benötige ich doch mehrere Instancen. Die Idee war nun das ganze mittels eines Kommandozeilen Parameter zu ...

das heist ich setzte ein Flag Need Close im Handler und polle dass im OnIdle des Formulars Var Form1: TForm1; NeedClose: Boolean = false; Implementation {$R *.lfm} { TForm1 } Procedure TForm1.ApplicationProperties1Idle(Sender: TObject; Var Done: Boolean); Begin Done := false; sleep(1); If NeedClose ...

Hallo Zusammen, Basierend auf diesem Beitrag: https://www.lazarusforum.de/viewtopic.php?t=14256 habe einen killall handler in meiner Anwendung, seit neuestem bekomme ich aber eine Zugriffsverletzung in der Anwendung wenn von außen das Killall kommt :( Project demo raised exception class 'External: S...

Hallo Zusammen, mit über 1000 Beiträgen sollte man ja meinen, dass ich mich schon längst mal vorgestellt habe, aber Tatsache das ist mir wohl durch gegangen. Also, im Realen Namen heise ich Uwe bin verheiratet und habe 2 Kinder (wobei Kind 1 grad die ersten Programmierversuche startet :mrgreen: ) un...