Deutsches Lazarusforum

Hat das was mit zu tun, dass die Adresse der Array-Variablen selbst dieselbe ist wie die Adresse des ersten Elements?

Also wie man es von C her kennt: Die Array-Variable selbst zeigt auf das erste Element des Arrays vom Element-Typ TdBodyID.
Und im Beispiel hätten sie eben implizit denselben ...

Hallo Leute,
ich habe eine Frage. Mein Programm verbindet sich mit dem Zeos ZConnection mit einer Datenbank im Internet. Wenn sich das Programm nicht verbinden kann dann kommt nach einer Weile ein Fehlercode mit unverständlichen Dingen drin...das möchte ich aber gerne abfangen.

Was für ...

Zu prüfen ob eine Verbindung zu einer DB aufgebaut werden kann, gehört IMHO zu keinen leichten Aufgaben.


Yepp. Diese Frage stellt sich im Schnitt alle 4-5 Monate erneut.



Hallo Zvoni,
hast du das schon einmal gemacht? Kannst du das? Grüße

Nein, musste ich noch nie machen.
Aber ich bin ...

Zu prüfen ob eine Verbindung zu einer DB aufgebaut werden kann, gehört IMHO zu keinen leichten Aufgaben.


Yepp. Diese Frage stellt sich im Schnitt alle 4-5 Monate erneut.

@Andy
Im Prinzip ist es dasselbe wie bei einem Mobiltelefon:
Du willst wissen, ob dein Kumpel auf dessen Mobiltelefon ...

PopupMenu hat eine PopupPoint-Eigenschaft.
https://lazarus-ccr.sourceforge.io/docs/lcl/menus/tpopupmenu.popuppoint.html

Desweiteren hat das TMenuItem (was ja erst einen Menü-Eintrag selbst darstellt) ein OnMeasureItem-Ereignis
https://lazarus-ccr.sourceforge.io/docs/lcl/menus/tmenuitem ...

PopupMenu hat eine PopupPoint-Eigenschaft.
https://lazarus-ccr.sourceforge.io/docs/lcl/menus/tpopupmenu.popuppoint.html

Desweiteren hat das TMenuItem (was ja erst einen Menü-Eintrag selbst darstellt) ein OnMeasureItem-Ereignis
https://lazarus-ccr.sourceforge.io/docs/lcl/menus/tmenuitem ...

Verbesserung:

procedure TForm1.BCMaterialDesignButtonKalenderClick(Sender: TObject);
begin
BGRAShapeKalender.Visible:=True;
If Not Assigned(FKalender) Then
Begin
FKalender:=TFKalender.Create(Self);
FKalender.OnClose:=@KalenderFormClose;
end;
FKalender.Show;
end;
In deiner Version wird im ...

Ein Kind kann durchaus ein Update im Parent machen. Einfach einen geplanten Callback machen. Siehe die ganzen On... Händler. Somit kann der Parent dem Kind sagen, wie er erreichbar ist, oder wer anderer der für das Ereignis zuständig ist.


Hmmm…….stimmt.
In mainform einen OnClose-handler, das ...

Ein eigener Konstruktor, in welchem du zusätzlich eine Referenz auf das Shape mitlieferst?
Brauchst natürlich ein Feld in TFKalender, was dann die Referenz hält


//In MainForm
procedure TForm1.BCMaterialDesignButtonKalenderClick(Sender: TObject);
begin
if not Assigned(FKalender) then
begin ...

Ich habe XRDP nie ausprobiert und VNC ist Schrott, selbst auf Windows Computer.
Ich habe bei uns in der Firma Nomachine installiert und es ist richtig gut, egal wo du auf der Welt bist, ist es so als ob du vor dem Computer sitzt. Das hängt natürlich von deiner Internetverbindung ab, da du es lokal ...

OK, kurz zur Erklärung:
Ich habe für unseren Einkauf eine DB-Anwendung (SQLite) geschrieben, mit welcher sie Luftfrachten kurz und schmerzlos kalkulieren können.
Hierbei gibt es einen wöchentlich wechselnden Zuschlag (Treibstoffzuschlag).
Mein Programm prüft ab, ob der/die Zuschläge noch gültig sind ...

Es gibt in LazFileUtils "DirectoryIsWritable".
Kannst ja mal damit probieren. Das versucht aber auch, eine Datei zu schreiben.

Es gibt anscheinend auch noch Möglichkeiten mit ACLs, aber da ich nicht auf Windows bin, habe ich davon keine Ahnung.
https://en.wikipedia.org/wiki/Access-control_list ...

Hallo zusammen,

Frage: Gibt es eine elegante (vorgefertigte?) Methode herauszufinden, ob ein User in einem bestimmten Ordner Schreibrechte hat?

Szenario: Programm liegt auf dem Fileserver in einem Ordner, für welchen es festgelegte Zugriffsrechte gibt. User bekommen einen Desktop-Link zu besagtem ...

Ungetestet

procedure FensterAktivieren(Form: TForm; Besitzer:TForm);

begin
If Form = Nil Then Form:=TFSchnellbericht.Create(Besitzer); //Braucht natürlich die Unit, wo FSchnellbericht definiert, ist in "Uses"

// Falls minimiert, wieder normal machen
if Form.WindowState = wsMinimized then ...

Soner hat geschrieben: Fr 17. Apr 2026, 11:30 Vielleicht XLSX-Dateien sind auch so.

XLSX sind definitiv ZIP-Dateien.
Hab damit schon genug Unfug getrieben