Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi [Andorra 2d] Menü(bzw was anderes als das level) zeichnen (https://www.delphipraxis.net/102970-%5Bandorra-2d%5D-menue-bzw-anderes-als-das-level-zeichnen.html)

fishbrain 10. Nov 2007 17:52

Re: [Andorra 2d] Menü(bzw was anderes als das level) zeichne
 
Nungut ich habe nun ein guimenü erstellt, kann es auch schon anzeigen, aber habe keine ahnung wie man was wie procedure adbutton1.click macht.
Könnste mir jemand bitte ein code geben, in dem das drin is oder es mir erklären?
danke

igel457 10. Nov 2007 19:07

Re: [Andorra 2d] Menü(bzw was anderes als das level) zeichne
 
Hallo,

zunächst musst du eine Prozedur innerhalb eines Objektes deklarieren, deren Parameter denen des Events entsprechen. Dann kannst du diese Prozedur einfach dem Event zuweisen.

Beispiel:

Delphi-Quellcode:
type
  TForm1 = class(TForm)
    [...]
  private
    procedure AdButtonClick(Sender:TObject);
  public
    [...]
end;

[...]

procedure TForm1.AdButtonClick(Sender:TObject);
begin
  TAdButton(AdGUI.FindComponent('Button1')).Caption := 'Du hast mich geklickt!';
end;

procedure TForm1.FormCreate(Sender:TObject);
begin
  //Andorra 2D initialisieren
  [...]
  //Gui Laden
  [...]

  //Ereignisse zuweisen
  TAdButton(AdGUI.FindComponent('Button1')).OnClick := AdButtonClick;
end;

Hoffe das hilft dir, wenn du noch Fragen hast dann kannst du mich ja einfach nochmal anschreiben,
Andreas

PS: Ich glaube, ich muss doch mal ein Tutorial schreiben...

fishbrain 10. Nov 2007 19:10

Re: [Andorra 2d] Menü(bzw was anderes als das level) zeichne
 
Wow genau das hab ich gebraucht.
Ja ein tutorial wäre super.
Danke!!

Edit:
Ich muss dich verbessern^^:
Es heißt nicht button1 sonder adbutton1.

g0rmed 11. Nov 2007 00:50

Re: [Andorra 2d] Menü(bzw was anderes als das level) zeichne
 
Das mit dem Tutorial hab ich mir auch schon gedacht^^
Naja es währe echt cool wenn du mal eins machen könntest...natürlich nur wenn du genug Zeit hast. Dann komm ich endlich bei meinen Projekten signifikant weiter :?

Ansonsten kann man eins nur wiederholen: :thumb: :thumb: :thumb:


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:01 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz