Andorra 2D [Ver. 0.4.5.1, 31.12.08]

[igel457]

Zitat von Codewalker:

Au ja. Eine Art "Preview" der GUI wäre ganz nett.

Ihr könnt euch ja die neusten Entwicklungsdateien im CVS-Repository herunterladen. Die relevanten Dateien liegen im Verzeichnis "src" und heißen "AdGUI.pas", "AdSkin.pas" und "AdComponents.pas"
Die GUI ist komplett XML basierend.
Die GUI wird ungefähr so verwendet werden können.

Delphi-Quellcode:

AdGUI := TAdGUI.Create(AdDraw1);
AdGUI.Skin.LoadFromFile('sunna.axs');
AdGUI.Cursors.LoadFromFile('mouse.xml');
AdGUI.ConnectEventHandlers(Form1);

AdForm := TAdForm.Create(AdGUI);
AdForm.LoadFromFile('mainmenu.xml');
with AdForm.FindComponent('Panel1') do
begin
  Hint := 'Ein tolles Panel';
  ShowHint := True;
end;
AdForm.OnMouseMove := WasWeisIch;

procedure Render;
begin
  .
  .
  AdGUI.Update;
  .
  .
end;

procedure Destroy;
begin
  AdGUI.Free;
end;

Vielleicht lade ich heute (oder morgen, oder übermorgen) mal eine Testverion hoch .

Danke für die rege Nachfrage,
igel457