Deutsches Lazarusforum

Kann es sein, dass du Pointer to Pointer bekommst?

ich sehe ein
Handle:=@L;
Handle ist aber ein out-param, also ist schon von Haus aus ein Pointer

Hab jetzt aber nicht in den Quellcode geschaut

Benutz doch Generics.Collections, die kann von haus aus Strings.
Wenn du bei FGL bleiben willst must du das OnDataPtrCompare Event setzen und dort den String Compare durchführen


Dachte ich auch zuerst, aber es gibt ne "Default"-Vergleichsfunktion (CompareByte).
Weil sonst müsste ja schon sein ...

Geh mal zu
C:\lazarus\lcl\interfaces\qtX\cbindings (x=6? ich hab nur QT5 bei mir)
(oder in welchem Ordner du Lazarus auch immer hast bzw. auf Linux)

und schau mal nach den Defines in qt6.pas
bzw. in qt6pas.pro (Einfach mit texteditor öffnen)
Da sollte ziemlich weit oben eine Kommentar-Zeile wie ...

Vielen Dank für die Idee,

statt dem zusätzlichen Parameter mit dem Initialwert verwende ich succ(Length(arr)) als Initialisierung des jeweils letzten Eintrages.
Dann passt das.


Bist du dir da sicher?

Dein Ur-Array hat eine Länge von 12, succ(12) ist 13.....
Hätte ein arr[high(arr)]:=succ(arr ...

Warum mit einem Loop und nicht mit open array und slices?
function increment(var arr: array of Integer): Boolean;
begin
Inc(arr[high(arr)]);
if arr[high(arr)]<2048 then
Exit(False);
{ Overflow handling }
arr[high(arr)]:=arr[high(arr)] mod 2048;
{ wir sind beim letzten(ersten) digit, daher ...

Ich glaube mich dunkel daran zu erinnern, dass man für Linux die Dependencies sehr genau bestimmen sollte.
Also die libs nicht "mitliefern", sondern im deb-Paket die Dependencies genau bestimmen, so dass bei Installation des deb-pakets die korrekten libs aus dem repo gezogen werden.

Jetzt gehts wieder.....

Internationales Forum ist komplett weg.
Bekomme nicht mal nen Ping
https://forum.lazarus.freepascal.org/index.php

Eine C/S-Anwendung hat per se erst mal nichts mit einer Datenbank zu tun (obwohl in den meisten Fällen durchaus auch eine Datenbank hintendran sitzt).

Ein Beispiel für eine C/S-Anwendung wäre z.B. ein "Berechnungsdienst" (Stellt euch eine Physik-Abteilung einer Universität vor)
Eine "Server ...

Wieso überhaupt ODBC für MySQL verwenden?!?!?!?
Verwende die mysql-units direkt.
Und dabei ist es egal ob Linux oder Windows

Alles was die anderen schon gesagt haben....

Zusätzlich:
Keine Ahnung inwieweit du schon Programmier-Erfahrung generell hast (andere Sprachen),
es gilt meiner Meinung nach immer folgendes:
Man muss klar zwischen SYNTAX und SEMANTIK unterscheiden

SYNTAX = Wie ist die Schreibweise für einen Befehl ...

Natürlich. Aber was machst du ein Jahr später, wenn die Unit auf 10.000 Zeilen angewachsen ist, du all die Details hierzu vergessen hast, und dein Kunde bemängelt, dass die Windrose manchmal ganz falsche Werte anzeigt. Da ist der Fehler viel schneller gefunden, wenn es eine Fehlermeldung gibt, ab ...

Bei der Formel irgendwas/(maxwert-minwert) ergibt das (maxwert-minwert) wahrscheinlich bei bestimmten Umständen Null.
Du kannst es mit exception abfangen:

try
x:=irgendwas/(maxwert-minwert);
except
x:=0; //oder irgendetwas anderes
end;


Das "versteckt" den Fehler, ohne ihn zu lösen, und ...

Bei der Formel irgendwas/(maxwert-minwert) ergibt das (maxwert-minwert) wahrscheinlich bei bestimmten Umständen Null.
Du kannst es mit exception abfangen:

try
x:=irgendwas/(maxwert-minwert);
except
x:=0; //oder irgendetwas anderes
end;



Wieso Exception abfangen?
Gleich von vornherein ...

Debug-Version nutzen, und StackTrace anschauen?