Forum: Multimedia
Delphi
by honkundich,
6. Jan 2007
fehlt da nicht irgendwo was? wenn ich das so einbaue kommt z.B undefinierter Bezeichner leicht1 usw.
Verstehe das nicht wirklich. :wiejetzt:
Forum: Multimedia
Delphi
by honkundich,
6. Jan 2007
procedure TForm1.Button1Click(Sender: TObject);
begin
if button1.caption = 'Spiel abbrechen' then begin
timer1.enabled:=false;
timer2.enabled:=false;
button1.caption:='Neues Spiel beginnen';
Startbildschirm.visible:=true;
haselnuss1.visible:=false;
haselnuss2.visible:=false;
Forum: Multimedia
Delphi
by honkundich,
6. Jan 2007
begin
if (haselnuss1.visible=false)and
(haselnuss2.visible=false)and
(haselnuss3.visible=false)and
(haselnuss4.visible=false)and
(haselnuss5.visible=false)and
(haselnuss6.visible=false)and
(haselnuss7.visible=false)then
begin
timer1.enabled:=false;
Forum: Multimedia
Delphi
by honkundich,
6. Jan 2007
Hab es nun doch gleich ausprobiert und alles hat geklappt, hab aber die erste, längere Variante genommen damit ich nicht so viel ändern musste und weil ich sonst durcheinander gekommen wäre, die Hauptsache ist ja das es funktioniert.
Habe nun noch eine Frage zu dem Befehl showmessage.
Dabei steht bei mir immer als Überschrift in dem Fenster was ich dann öffnet Project.... irgendwas, kann man...
Forum: Multimedia
Delphi
by honkundich,
6. Jan 2007
WooooWWW Danke Danke!!! hätte niemals damit gerechnet so schnell eine Lösung für mein Problem zu erhalten, bzw. eine Antwort zu bekommen. :dancer: :hello:
werde dann gleich morgen mal versuchen mein Programm zu ändern und hoffe das ich es zum Laufen bekommen so das es funktioniert.
Bis morgen dann, ich melde mich wieder
Forum: Multimedia
Delphi
by honkundich,
5. Jan 2007
Hallo und Guten Tag.
Muss bis Sonntag Abend mit meinem kleinen spiel fertig sein und weis einfach nicht mehr weiter.
Ich poste mal den Quellcode ..vielleicht kann mir ja jemand helfen. // Einsameln der Images bzw. der Haselnüsse
procedure TForm1.Haselnuss1Click(Sender: TObject);
begin
Haselnuss1.visible:=false;
Mediaplayer1.filename:='misc1-22.wav';
MediaPlayer1.open;
MediaPlayer1.play;