Selbst erzeugtes Image wird nicht angezeigt

[Die Muhkuh]

Hiho,


ich erzeuge mit:

Delphi-Quellcode:

procedure TForm1.PaintBox1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  Sch: TImage;
begin
  Sch := TImage.Create(Paintbox1);
  Sch.Picture.LoadFromFile('Schuss.bmp');
  Sch.Left := Spi.Left;
  Sch.Top  := Spi.top;
  Sch.Parent := self;

Ein Image in einer Paintbox. Aber das Image wird nicht angezeigt! Warum?



PS: Sch = Schuss
Spi = Spieler1

[Luckie]

Du musst der Eigenschaft Parent noch dein Formular zu weisen.

[Die Muhkuh]

Danke so geht's.

Ich beweg die Schüsse mit nem Timer.
Aber wenn ich mehrmals klicke dann bleiben die anderen "Schüsse" grade stehen! Warum gehen die net weiter?

[phlux]

Neue Frage neues Thema, das gilt auch für dich :warn:

[Die Muhkuh]

Zitat:

Zitat von phlux

Neue Frage neues Thema, das gilt auch für dich :warn:

Sorry hast recht! Hab ich vergessen :wall:

[Luckie]

@phlux aber der musste nicht sein: :warn:

[Die Muhkuh]

Zitat:

Zitat von Luckie

@phlux aber der musste nicht sein: :warn:

Aber recht hatte er!

[phlux]

Zitat:

Zitat von Luckie

@phlux aber der musste nicht sein: :warn:

:P wieso wenn ihr nicht wollt das man den warn smiley nutzt nehmt ihn raus, genauso wie meinen geliebten :assembly: Smiley wo ich wohl lt. Stats die 0,0000001% der User war die den genutzt hat :mrgreen: