Deutsches Lazarusforum

OK, akzeptiert. Hast Recht. Schlechtes Beispiel mit Enums. Ist jetzt schon 3-4 Jahre her, dass ich irgendwas in Richtung C-Bindings gemacht habe
Mit den enums kann man sich streiten wie man es macht.
Macht man ein echtes Pascal enum, dann hat man eine saubere Typenprüfung, aber sobald man ...

Ganz zu schweigen von, dass da definitiv Sachen komplett fehlen (enum rtlsdr_tuner z.B. wird zu einzelnen Konstanten "übersetzt").
Wen dir dies nicht passt, kannst du praktisch alle Bindungen welche bei Lazarus dabei sind wegwerfen, inklusive GLIB2 und GTK2.
Dies ist gang und gäbe, das c-Enums in ...

@juelin

Hast du ein Muster Programm, oder bist du einfach am probieren ?
Ich würde mal ein einfaches C-Programm anschauen und dieses mal nach Pascal portieren und probieren.
Wen dieses läuft, kannst es immer noch in den LCL-Programm einbauen.

So mache ich es, wen ich eine C-Lib ausprobiere.

Ein Nachteil hat das ganze, der Compiler läuft einwandfrei, aber die Lazarus-IDE findet die Deklarationen nicht mehr in den INC-Dateien, wen man sie mit der rechten Maustaste suchen will.
Vielleicht bin ich der erste, welcher dies ausprobierte, INC-Dateien in einem Macro zu bündeln.
Ach Ctrl-C geht ...

Ich habe gerade eine Sinnvolle Anwendung mit {$MACRO ON} gemacht.

Für solche Fälle gibt es im Normalfall 2 Lösungen,
Entweder man schreibt den $include Block doppelt oder man lagert ihn in eine zusätzliche *.inc aus. so wie es bei glib2.pas der Fall ist.

Vorhin bin ich gerade auf eine 3. Lösung ...

Hallo,
nun habe ich nach viel Arbeit die nötigen Files für mein Programm
zum Steuern eines SDR erstellt.
librtlsdr.dll und rtl_sdr.pas siehe Anhang librtlsdr.zip.
In meinem Programm rufe ich im Ereignis FormActivate
die Funktion rtl_sdr.rtlsdr_get_device_count aus rtl_sdr.pas auf.

Ich habe deine ...

Ich wollte estwas mit Variant ausprobieren, da habe ich festgestellt, das der Single als Double erkannt wird.
program Project1;

uses
Variants;

procedure ProcessVariant(v: variant);
begin
case varType(v) of
varSingle: begin
Writeln('Single');
end;
varDouble: begin
Writeln('Double');
end ...

Ich habe aus neugier mal kurz den Header übersetzt.
Für Window muss die Konstante zur DLL noch richtig angepasst werden.
Bei mir kommen natürlich 0 Geräte wie erwartet.

Sonst erst mal den "rtl-sdr" Header konvertieren. Vielleicht von hier?
https://github.com/steve-m/librtlsdr/bl ... /rtl-sdr.h

Als verwöhnter Linux User, bekommt man die Header sehr einfach mit

Müll ist was nur dann, wenn es nicht funktioniert und trotzdem Geld gekostet hat. Das kann man Windows nicht vorwerfen (Ausser bei vielleicht bei ein paar Versionsnummern :-) ).

Für mich ist Windows gestorben, das kommt nicht mehr auf meinen PC.

Übrigens was ich recht interessant finde ist der ...

Bei Windows kommt noch Historie hinzu, als Windows Internationalisierung unterstützen musste im NT Kernel gab es noch kein UTF-8 und der Unicode Space war auch noch nicht voll Durchspezifiziert, aber Microsoft konnte nicht warten weil ihnen Internationale Kunden aufs Dach gestiegen sind, und daher ...

Was nützt eigentlich ein 16bit Char. Mit utf8 ist doch das Problem gelöst, das man fast unendlich viele Zeichen darstellen kann.
Und wen doch einmal einer auf die Idee kommt und eine 16bit Char will, gibt es ja WideChar.
Es reicht ja schon, das es beim Integer keine Garantie gibt, das er 32bit hat.

Es gibt da eine schöne Infografik auf Wikipedia: https://en.wikipedia.org/wiki/License_c ... S_licenses

Das ganze ist viel zu kompliziert, sowas schreckt Open Source Programmierer nur ab.

Oh oh, dann passiert möglicherweise der gleiche Mist, weshalb ich früher die Umstellung auf Delphi 2009 nicht ohne weiteres mitmachen konnte - nämlich weil einige meiner Prozeduren fest von 8-Bit-Kodierung ausgingen (weil es vorher in Delphi und Pascal immer so war).
Das schreckt mich zwar ...

Zweimal Ja.
So ist es.

Da FreePascal einen String = AnsiString inzwischen standardmäßig in UTF-8 kodiert und sich UTF-8 in der IT-Welt etabliert hat, vermute ich, dass für FreePascal kein Wechsel mehr vorgesehen ist.

Man muss sich bei UTF-8 bewusst sein, dass ein Zeichen außerhalb von ASCII ggf ...