Deutsches Lazarusforum

Gut, ich bin jetzt einen Schritt weiter. Der oben aufgeführte Code funktioniert wunderbar. Um zu verstehen warum es nicht bei mir klappt erkläre ich was die DLL genau macht. In einer anderen Funktion erwartet die DLL einen PSHA256 als Argument. Damit das Hostprogramm keine Implementierung zur Hashge...

Achso, ich dachte immer wenn man nichts vor ein Argument schreibt ist es automatisch const. Man lernt nie aus. Da werde ich wohl bei einigen meiner Funktionen etwas ändern.

Guten Abend allerseits, ich bin grade etwas verwundert oder sehe den Wald vor lauter Bäumen nicht. Jedenfalls möchte ich den Pointer eines statischen Arrays als Pointer über eine DLL übergeben. Folgendes habe ich gemacht: type TSHA256 = array[0..31] of Byte; PSHA256 = ^TSHA256; ... function SHA256&#...

Nein da musst du nichts ändern. Das ist ja das schöne an den Pascal-Strings, dass sie alle gemanaged sind.

Das müsstest du nur bei PAnsiChar, PWideChar u.ä. machen.

Warum soll man nicht einen guten alten record nehmen? Nur, weil Klasse mehr nach OOP klingt? Weil bei der Zuweisung einer Instanz nur der Pointer übergeben wird, bei Records alle Daten kopiert werden. type TMyClass = class private FElement: String; public property Element: String read FElement writ...

Theoretisch ja, ist aber unnötig. Nutz lieber direkt AnsiStrings. Hier mal ein Überblick über sämtliche Stringtypen: http://wiki.freepascal.org/Character_and_string_types/de#ShortString

Schon klar, aber das decken ja schon die alten Objekte aus Turbo-Pascal-Zeiten ab. Deswegen wundert es mich ja, warum die Records noch zusätzlich aufgebohrt wurden. Mich wundert es, dass man in Record auch proceduren und funktionen schreiben kann... Macht durchaus sinn. Hier ein reales Beispiel von...

Michl hat geschrieben:Ich kann es hier nicht testen, doch probier mal, ob es bei dir so geht? Dein Projekt geändert anbei.

Vielen Dank, das hat mir sehr weitergeholfen.

Moin, seit einigen Tagen verzweifle ich daran die WM_TOUCH Message zu erhalten. Nach etlichen Google-Recherchen welche mich unter anderem zum englischen Lazarusforum, Delphi-Praxis, dem MSDN Forum u.a. geführt hatten erstelle ich nun mal selbst einen Beitrag dazu. Angeblich ist die Sache realtiv ein...

Oh, das wusste ich gar nicht. Da ich aktuell ein Multiplayer-Spiel mache welches ich später evtl auch auf Android verfügbar machen möchte, wäre das auch für mich interessant. Den Server würde ich dann natürlich trotzdem weiter mit Lazarus entwickeln

@MacWomble Tipp: die ganzen Get und Set Funktionen kannst du dir auch sparen wenn sie nichts anderes machen außer lesen und schreiben. Folgendes funktioniert auch wunderbar: TMyClass = class private FId: Integer; public property Id: Integer read FId write FId; Nur wenn du durch das Ändern einer prop...

Hast du vielleicht ausversehen die {$H+} Zeile gelöscht?

Ich bins nochmal. Hab es jetzt hinbekommen: uses ... {$ifdef mswindows}, windows {$endif}; ... private {$ifdef mswindows} FTaskbarItemHandle: HWND; {$endif} ... procedure TWnd_Test.FormChangeBounds(Sender: TObject); begin {$ifdef mswindows} if FTaskbarItemHandle <> INVALID_HANDLE_VALUE then ...

So, ich hab noch mal ein bisschen rumprobiert. Dazu wollte ich das Taskbar item mit ITaskbarList (un)sichtbar machen. Hier eine Möglichkeit wie es in Delphi funktionieren sollte (laut Delphi-Praxis Forenbeiträgen): ... uses shlobj, comobj, windows; ... private FTaskbar: ITaskbarList3; ...   procedur...

Guten Tag allerseits, da ich in letzter Zeit eine universelle Übersetzungsfunktion einbauen wollte und mir i18n viel zu komplex ist dachte ich mir ich erstelle mal eine einfach zu verwendende Übersetzungsengine. Das ganze "Projekt" besteht nur aus einer einzigen Quelldatei sodass man kein ...