Deutsches Lazarusforum

Hat geklappt, besten Dank.


Um so etwas herauszufinden, muss man eigentlich nicht auf das Forum warten.
In der Doku dazu steht oben rechts "Reference for unit ' Types ' (#rtl)"
https://www.freepascal.org/docs-html/rtl/types/tsize.html

Was auch geht: Im Nachrichtenfenster einen Rechtsklick auf ...

Stellt sich raus, dass beim Update von Ubuntu 22.04 auf 24.04 beim Bootloader was schief ging.


Genau genommen ist das ein Upgrade und kein Update.
Bei normalen Updates auf OpenSuse habe ich kaum Probleme.
Am meisten leiden die mit NVIDIA. :wink:

Bei Distro Upgrades muss man halt schauen, ob ...

Aber das Forum ist da:
https://check-host.net/check-http?host= ... ascal.org/
freepascal.org selber nicht:
https://check-host.net/check-http?host= ... ascal.org/

Das geht doch (nur kurz am Beispiel mlparse ausprobiert):

Was mir nachträglich noch aufgefallen ist mit der ClientHeight: Es hängt tatsächlich auch vom Widgetset ab, was da passiert.
Bei GTK2 bewirkt das Setzen von ClientHeight eine Vergrösserung von Height.
Bei Qt6 können beide Werte anscheinend gleich sein.

So getestet:

procedure TForm1.FormShow ...

Probier mal ClientHeight kleiner als FHeight zu machen oder gar nicht im Code zu verändern.

Ist ja auch bei einem normalen Panel so:
Hier wird Height auch grösser.

Wird der HTMLViewer noch weiterentwickelt?


Wer weiss? Vielleicht durch dich? :wink:

Ich benutze den schon lange in meinem Email Vorschau-Progrämmchen um HTML Mails anzuschauen.
Das funktioniert für den Hausgebrauch erstaunlich gut.
Es gibt schon manchmal Darstellungsfehler, aber meistens ...

export sql:

insert into table values(1,2,"hier ist der "text" der gesetzt wird");


import geht nicht wegen "text";

Ich verstehe das Problem nicht. Kann es sein, das du dich verrannt hast?
" hat in Pascal keine syntaktische Bedeutung. Stringkonstanten sind in '.
In deinen Beispiel sehe ich ...

das ist ein PDf mit outline / toc / Inhaltsverzeichnis an der seite
https://raw.githubusercontent.com/fileformat-blog-gists/SampleFiles/main/PDFs/SamplePDF-19kb-Text-Formatting-1Page.pdf
Das geht mit powerpdf, oder soll zumindest.
Da ich das PDF aber im Code erzeuge und nicht im Form-Editor, suche ...

Wie stellst du dir das vor?
Was ist denn speziell, an einem PDF Inhaltsverzeichnis?
Welchen Aspekt meinst du? Meinst du Seitenlinks? Formatierung?
Wo liegt das Problem?

Das ist ein allgemeines Phänomen.
So lange etwas Blockierendes im Haupt-Thread läuft, reagiert nichts anderes im GUI.
Entweder den Script-Teil in einen separaten Thread auslagern, oder in Blöcke aufteilen und immer mal wieder Application.Processmessages aufrufen.

https://wiki.freepascal.org ...

Mathias hat geschrieben: Do 7. Aug 2025, 14:14 Da wäre recht spannend, was die STringList für eine Sortierroutine verwendet. Ob da was anderes als QSort verwendet wird ?

Zu dumm, dass wir keinen Quelltext haben...

procedure TStringList.QuickSort(L, R: Integer; CompareFn: TStringListSortCompare );

Warum das "Show". bzw. von wo weiß das Programm das damit Form1 gemeint ist?


Das "Show" befindet sich in einer Methode von TForm1, daher bezieht es sich darauf, wenn keine Instanz einer andern Klasse angegeben ist, wie z.B. bei Form2.Hide;

procedure TForm1.Timer1Timer(Sender: TObject);

Man ...

Andy Nightingale hat geschrieben: Di 5. Aug 2025, 18:37 kann das stimmen?.- Unit2 und dann { TForm1 }

uses Unit2, damit auf Form2 zugegriffen werden kann.

Andy Nightingale hat geschrieben: Di 5. Aug 2025, 18:37 procedure TForm1.FormActivate.-oder ist das extra so gemacht? Sorry das ich so nachfrage.

Das ist das OnActivate Event von Form1.

Wie würdest du das denn machen? Danke dir.


Wie gesagt, mit Hide / Show.
Lass alles im lpr so, wie es Lazarus erstelllt.

Dann mach in Unit1 (Timer auf Form1, OnActivate und OnTimer natürlich im Obj. Insp. einhängen):

....
uses Unit2;

{$R *.lfm}

{ TForm1 }

procedure TForm1.FormActivate ...