Einzelnen Beitrag anzeigen

Benutzerbild von Dani
Dani

Registriert seit: 19. Jan 2003
732 Beiträge
 
Turbo Delphi für Win32
 
#5
  Alt 26. Mai 2003, 00:00
Besten Dank schonmal!

Beim compilieren von dem hier, kommt aber leider noch der Fehler "Operator oder Semikolon fehlt":

Delphi-Quellcode:
library ViseEntryData;

uses
  SysUtils,
  Windows,
  Dialogs;

{$E DLL}

{R *.res}

type
PCViseEntryData = ^TCViseEntryData;
TCViseEntryData = object
  m_hwndMain: HWND; // Main window handle
  m_hwndProgress: HWND; // Progress dialog window handle
  m_bUninstall: BOOL; // Uninstaller flag
  m_lpszUninstallLogFile: PChar; // Uninstall log file path
  m_lpszTempDir: PChar; // Installer VISE’s temp directory path
  m_hinst: THandle; // Instance handle of the VISE dll
  m_szInstallerName: array[0..MAX_PATH - 1] of Char; // Name of the installer
end;

const
 nz=#13+#10;

var pViseEntryData: PCViseEntryData;

function ViseEntry(lParam1:LongInt; lpParam2:LPCSTR; dwReserved:DWORD):LongInt; stdcall;
begin
Result:=1;
pViseEntryData := PViseEntryData(dwReserved);
ShowMessage('Welcome to ' + pViseEntryData.m_szInstallerName + '.' + nz
            + 'The temporary directory is ' + pViseEntryData.m_lpszTempDir);

end;




exports
    ViseEntry;
{$R *.RES}

begin


end.
Und zwar in der Zeile "pViseEntryData := PViseEntryData(dwReserved);"
Hab ich da was falsch eingetragen?!
Dani H.
At Least I Can Say I Tried
  Mit Zitat antworten Zitat