Deutsches Lazarusforum

TObject.GetInterface() dient zu diesem Zweck:
https://www.freepascal.org/docs-html/cu ... rface.html
Das Interface muss eine GUID (bei COM-Interface) oder einen ID-string (bei Corba-Interface) haben.

Warum machst du nicht einfach ein Projekt-Template welches die benötigten Angaben enthält? Du kannst dich ja am MSEide Projekt-Template für STM32 orientieren, speziell 'Projekt'-'Options'-'Makros'.

pluto hat geschrieben:im C Code sind jedoch auch 3 FFF vorhanden?

Nein, "if (t == 0xFFFF) return NAN;".

Wieder mit ASM? Natürlich. Ja, dass ist auch meine Vermutung. Problem ist halt nur, was soll ich in diesenfall zurückgeben? Normalerweise würde ich ja -1 zurück geben. Das geht aber in diesenfall natürlich nicht Definiere für NAN einen nie vorkommenden Integerwert, z.B. $8000 = -32768. Oder gib den...

if (t == 0xFFFF) return NAN; Wird hier ein Speicherübrlauf geprüft? Würde das in Pascal genauso aussehen wie oben? if t and $FFFF = 0 then ? Edit: Die frage ist auch: Was für ein Rückgabe Wert NAN gibt es nicht... und -1 geht ja auch nicht..... Ich habe nicht alles gelesen. Ich vermute, das...

pluto hat geschrieben:Auf den ersten Blick ist es wohl nur für Pic....

AFAIK für PIC6x. Das sind auch praktische uP's. Ich weiss nicht ob Edson weitere Familien zu unterstützen plant.

pluto hat geschrieben:

if (t and $8000) then

Wie sieht sowas in Pascal aus ?

if t and $8000 <> 0 then

MSEide 'Search'-'Find in Files' liefert: findinfile.png Doppelklick in Zeile 4 springt zu: source1.png Ctrl+Shift+Up springt zum Header, der Klassenkopf sieht so aus: source2.png Ctrl+LeftClick auf TLazCompilerOptions springt auf source3.png wo die abstrakte Definition von SetAlternativeCompile() st...

Ich meinte mit class object eigentlich.... Dann schreibe das bitte auch so. "object" richtig angewandt kann für uP's Sinn machen, "class" nicht, da es einen grossen Overhead bedeutet. Auch musst du darauf achten, dass nicht unnötig RTTI angelegt wird. Falls du dich für die Progr...

In Lazarus lcl/interfaces/gtk2/gtk2widgetset.inc findet sich   procedure TGtk2WidgetSet.ProcessChildSignal; var pid: tpid; reason: TChildExitReason; status: integer; info: dword; handler: PChildSignalEventHandler; begin repeat status:=0; pid := fpwaitpid(-1, status, WNOHANG); <<<<<------ if ...

thosch hat geschrieben:Welche Funktion hat dann aber der Adressoperator im objfpc Mode. Da meckert der Compiler an besagter Stelle.

https://www.freepascal.org/docs-html/cu ... 4-620003.6
Wie sind denn "EnumDisplayModes" und "EnumAllModesCallBack" definiert?

pluto hat geschrieben:

Vielleicht gibt es ja eine Art Kompromiss zwischen besonders "platzsparend" und besonders "schnell"?

Häufig sind besonders platzsparende Programme auch besonders schnell. Es gibt einfach mehr zu studieren.

uP Programme müssen aber besonders schnell und platzsparend sein, darum fallen viele vom PC gewohnte Arbeitsweisen aus dem Rennen.

Das wird zwar Aufwendiger werden den Code zu schreiben, aber ich glaube das wäre ein guter Kompromiss. Warum nicht auch auf dem PC mit "object" wenn die Routine auch auf einem uP laufen soll? Auch wenn dich gestandene Delphi Programmierer dafür belächeln oder anfeinden werden, wir wissen ...

Wenn ich das jetzt richtig verstanden habe, ist der "einzigste" unterschied der, zwischen Statischem Speicher und Dynamischen Speicher? "object" kann im Heap (= "dynamischer Speicher") oder als globale Variable oder als lokale Variable im Stack angelegt werden. "c...