Tut mir leid,aber was haben die Beispiele mit meiner
dll oder deren Einbindung zu tun?
Ich will ganz einfach einen Null-Terminierten String übergeben.
Delphi Beispiel:
Delphi-Quellcode:
function GetMailsEx(Mails: PChar; KillDuplicates, RealNameEnabled,
RealNameSimulated, FromOutlook, FromOpera, FromNetscape, FromLotusNotes,
FromEudora, FromPegasus: boolean): boolean;
stdcall;
external
'
B:\Projekte\Komponenten\LocalMail\dll\localmail.dll'
name '
GetMails';
...
var
Antwort: PChar;
begin
Antwort := StrAlloc(MAX_RESULT);
if GetMailsEx(Antwort, True, True, True, True, True, True, True, True, True)
= True
then
ShowMessage(Antwort);
end;
Warscheilich habe ich Probleme, weil ich in VB keinen Speicher zugewiesen habe... aber wie geht das?
Elektronische Bauelemente funktionieren mit Rauch. Kommt der Rauch raus, geht das Bauteil nicht mehr.