Deutsches Lazarusforum

um fpc 3.2.3 in einer funktionierenden Lazarus-Installation zu installieren, befolge ich die beigefügten Anweisungen.

Wie bereits gesagt, strukturieren Sie Ihren Code:
- Trennen Sie sich wiederholenden Code in separate Funktionen/Prozeduren
- Verwenden Sie Listen oder dynamische Arrays anstelle von Arrays mit fester Größe
Dann wird es sicherlich leichter sein, das Problem zu finden.
Zum Beispiel:
uses
fgl;

type ...

Werkzeuge > Einstellungen > Editor > Allgemein > Verschiedenes > abwählen "Sonderzeichen anzeigen"

Ich empfehle die Verwendung von QuestionDlg, wo Sie die Schaltflächen nach Belieben beschreiben und sogar mehr als 2 Schaltflächen definieren können.

Dir ist klar, dass du jedesmal diesselbe Variable "Data" verwendest, um eine NEUE Instanz von TData zu Createn?
.....bin mir sogar sicher, so wie das jetzt ist, leckt das wie ein Sieb......

Das stört Sie überhaupt nicht, solange Sie am Ende die Liste freigeben, zu der Sie all diese erstellten ...

bei der Formatierung bedeutet eine ‚0‘, dass hier immer eine Ziffer stehen sollte, und ein ‚#‘ bedeutet, dass hier eine Ziffer stehen kann oder nicht, wenn es sich um eine endgültige oder anfängliche 0 handelt.
zum Beispiel:
Zahl | Format | Ergebnis
--------------------------------------
1,234 ...

Ich empfehle nicht, die Funktion „Format“ in der Abfrage zu verwenden, da dann Text anstelle von Zahlen angezeigt wird.
Verwenden Sie die Eigenschaft „DisplayFormat“, wie @theo schrieb
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
DataSource1.DataSet := ZQuery1;
DBGrid1 ...

Das OleDB-Protokoll funktioniert sehr gut mit MSSQL - Bedingung: Sie müssen ZEOS Version 8 installieren.
Ein Beispiel ist beigefügt - prüfen Sie, ob es bei Ihnen funktioniert.

Ich benutze Lazarus trunk und fpc 3.2-fixes jetzt seit ein paar Jahren und in dieser Zeit hatte ich mehr als ein Dutzend Probleme damit - ich habe den Bugtracker durchgesehen und es gab 4 Bugs in FPC und 11 Bugs in Lazarus.
Aber meiner Meinung nach ist es das wert:
- im Falle von FPC, unter anderem ...

Sie haben mORMot installiert, aber den Inhalt nicht in das statische Verzeichnis hochgeladen.
Laden Sie das Archiv von hier herunter: https://synopse.info/files/mormot2static.7z und entpacken Sie den gesamten Inhalt in das "mormot-Installationsverzeichnis\static", z.B. „c:\Lazarus\mormot\static“.

Win 10, Lazarus 4.99-trunk, FPC 3.2-fixes
x86
-O0
For-Loop = 797 ms
While-Loop = 1672 ms
Repeat-Loop = 1687 ms
-O1
For-Loop = 563 ms
While-Loop = 1672 ms
Repeat-Loop = 1609 ms
-O2
For-Loop = 219 ms
While-Loop = 203 ms
Repeat-Loop = 219 ms
-O3
For-Loop = 218 ms
While-Loop = 219 ms
Repeat-Loop = 203 ...

können Sie die IDE-Direktive verwenden: {%H-} , dann werden die Hinweise nicht angezeigt, sondern nur für die Variable, vor der diese Direktive steht. Für Variablen in einer Funktions-/Prozedurdefinition muss die Direktive sowohl im Abschnitt interface als auch im Abschnitt implementation verwendet ...

etwa so: uses
Types, Math;

procedure TForm1.FormResize(Sender: TObject);
var
fsw, fsh: Integer; //font sizes
ts: TSize; //text size for font size 10
begin
Label1.Font.Size := 10;
ts := Label1.Canvas.TextExtent(Label1.Caption);
fsw := 10 + trunc((Label1.Width - ts.Width) * 72 * (ts.Height / ts ...

@juelin - wie @RudiRatios schrieb, ist Ihr Code furchtbar „langatmig“, die Wiederholung von zitierten Zuweisungen oder die Duplizierung von Ereignissen macht es sehr schwierig, den Code zu analysieren und zu ändern, da dies dann für jedes Ereignis einzeln geschehen muss.

Im Anhang finden Sie eine ...