AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Komponenten über Befehl erstellen

Ein Thema von rawsoul · begonnen am 2. Dez 2006 · letzter Beitrag vom 3. Dez 2006
Antwort Antwort
Seite 3 von 3     123   
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#21

Re: Komponenten über Befehl erstellen

  Alt 3. Dez 2006, 14:56
AAAlso:
Arrays: http://www.dsdt.info/tutorials/crashkurs/?page=6

Delphi-Quellcode:
  with bilderchen[high(bilderchen)] do
  begin
    parent:=self;
    top:=markerimage.top;
    left:=markerimage.left;
    picture.loadfromfile('gfx\decal3.bmp');
  end;
ist das gleiche wie

Delphi-Quellcode:
  bilderchen[high(bilderchen)].parent:=self;
  bilderchen[high(bilderchen)].top:=markerimage.top;
  bilderchen[high(bilderchen)].left:=markerimage.left;
  bilderchen[high(bilderchen)].picture.loadfromfile('gfx\decal3.bmp');
und spart Zeit^^

high liefert das höchste elemnt eines Arrays
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Benutzerbild von rawsoul
rawsoul

Registriert seit: 29. Okt 2006
Ort: Düsseldorf
249 Beiträge
 
Delphi 2005 Personal
 
#22

Re: Komponenten über Befehl erstellen

  Alt 3. Dez 2006, 15:07
Super, danke !

Das heißt, es wird jedem Element aus dem Array einen anderer Namen gegeben?
Wie kann ich dann später darauf zurückgreifen? Ich habe nämlich vor, die einzelnen Images später wieder destroyen zu lassen
Frank Dumont
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#23

Re: Komponenten über Befehl erstellen

  Alt 3. Dez 2006, 16:20
Du hast ein Array wo jedes Element eines deiner Images ist. Wie zerstört man ein normales Object? mit ".Free". Wenn nun jedes Array Element ein Object ist liegt es doch mehr als nah wie man es zerstört.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von rawsoul
rawsoul

Registriert seit: 29. Okt 2006
Ort: Düsseldorf
249 Beiträge
 
Delphi 2005 Personal
 
#24

Re: Komponenten über Befehl erstellen

  Alt 3. Dez 2006, 16:51
Merci!

Das ist mein aktueller Stand.

Noch ein Problem...
Delphi-Quellcode:
procedure TForm1.enemyTIMERTimer(Sender: TObject);
begin
  repeat
    begin
      Setlength(enemy1, high(enemy1)+2);
      enemy1[number]:=timage.create(self);
      with enemy1[number] do
        begin
          parent:=self;
          left:=0;
          picture.loadfromfile('gfx\enemy2.bmp');
          transparent:=true;
          top:=2*raster+random(64);
        end;
      number:=number+1
    end
    until number=stage*2
end;
Sobald ich den Timer aktiviere, hängt sich die exe auf. Was stimmt da schon wieder nicht?

//edit
Hat sich erledigt, der Buffer war überlastet...
Angehängte Dateien
Dateityp: rar towerwars_635.rar (2,14 MB, 12x aufgerufen)
Frank Dumont
  Mit Zitat antworten Zitat
Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#25

Re: Komponenten über Befehl erstellen

  Alt 3. Dez 2006, 20:29
Was sollen wir jetzt mit der exe machen?
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat
Benutzerbild von rawsoul
rawsoul

Registriert seit: 29. Okt 2006
Ort: Düsseldorf
249 Beiträge
 
Delphi 2005 Personal
 
#26

Re: Komponenten über Befehl erstellen

  Alt 3. Dez 2006, 20:56
Gar nichts
Wollte euch bloß einen Einblick davon verschaffen, was ich vor habe...
Frank Dumont
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 3 von 3     123   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:13 Uhr.
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