Registriert seit: 17. Mär 2008
298 Beiträge
Delphi 7 Personal
|
Re: [Andorra] seltsamster Fehler bei AdDraw.dllname:='xy.dll
27. Feb 2009, 22:23
ja, denke ich schon:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
AdPerCounter := TAdPerformanceCounter.Create;
AdDraw := TAdDraw.Create(self);
AdDraw.DllName := ExtractFilePath(ParamStr(0)) + 'andorraOGL.dll';
if AdDraw.Initialize then
begin
Application.OnIdle := Idle;
AdImageList := TAdImageList.Create(AdDraw);
with AdImageList.Add('tank_red') do
begin
Texture.LoadGraphicFromFile('tank_red.bmp',true,clFuchsia);
end;
AdImageList.Restore;
angle:= 0;
end
else
begin
ShowMessage('Error while initializing Andorra 2D. Try to use another display '+
'mode or another video adapter.');
Close;
end;
end;
---Zufall ist das Inkognito Gottes---
|