Zitat von
maximus Caesar:
Laut Tutorial hab ich in der
Unit dlls der Prozedure "start" die prozedure "start" der
dll "Weg" zugewiesen,
Hä???
Zitat:
Wenn das nicht stimmt, wie kann ich dann die Prozedure "start" der "Weg.dll" aufrufen?
Dynamisch ginge es so: (Am Beispiel für Shellexecute, für das man normalerweise die
Unit ShellAPI.pas einbinden müsste.)
Delphi-Quellcode:
type
TShellexecute = function(hWnd: HWND; Operation, FileName, Parameters,
Directory: PChar; ShowCmd: Integer): HINST; stdcall;
procedure TForm1.Button1Click(Sender: TObject);
var
hLib: cardinal;
MyShellExecute: TShellexecute;
begin
hLib := LoadLibrary('shell32.dll');
if hLib <> 0 then
begin
@MyShellexecute := GetProcAddress(hLib, 'ShellExecuteA');
if not Assigned(MyShellexecute) then
begin
RaiseLastOSError;
exit;
end;
end
else
begin
RaiseLastOSError;
exit;
end;
MyShellexecute(Form1.Handle, 'open', 'Notepad.exe', nil, nil, SW_NORMAL);
end;
Und nach welchem Tutorial? In dem von Assarbad sthet das so bestimmt nicht drinne:
http://www.luckie-online.de/Delphi/Importe/Assarbad/