Hi Andreas,
ich versuch gerade eine
GUI zu laden, jedoch wird nur ein Mauszeiger angezeigt, den man auch nicht verschieben kann.
Relevanter Code:
Delphi-Quellcode:
// DrawMenu
if not FMenuLoaded
then
MenuState := Menu;
with FEngine
do
begin
FAdDraw.ClearSurface(clBlack);
FAdDraw.BeginScene;
FAdGUI.Update(FAdPerformanceCounter.TimeGap / 1000);
FAdDraw.EndScene;
FAdDraw.Flip;
end;
// SetMenuState
if Value <> FMenuState
then
begin
FMenuLoaded := false;
FMenuState := Value;
// Menüdaten laden
case FMenuState
of
msMainMenu:
begin
FAdGUI.LoadFromFile('
GUI.axg');
FMenuLoaded := true;
end;
msNone: fMenuLoaded := false;
end;
end;
// Idle
FAdPerformanceCounter.Calculate;
if FAdDraw.CanDraw
then
begin
case State
of
gsMainMenu:
begin
FGUI.DrawMenu(msMainMenu);
end;
end;
end;
Done := false;
// OnCreate von TGUI
FAdGUI := TAdGui.Create(FEngine.FAdDraw);
FAdGUI.Skin.LoadFromFile('
sunna.axs');
FAdGUI.Cursors.LoadFromFile('
cursors.xml');
FAdGUI.DesignMode := false;
Die Datei
GUI.axg hänge ich hier mal an. Die anderen Dateien (sunna.axs, cursors.xml, cursors.ail) hab ich auch dem Toolsordner entnommen.
Runtergeladen hab ich heute von Deiner Seite die Version 0.20 ALPHA.