Nabend zusammen,
kurze frage:
Ich versuche mich gerade mal an einem Zeichen-Programm, nur aus reiner neugier, da ich vorher noch nie was mit Grafik in Delphi gemacht habe, jetzt bin ich dabei gerade mal in den Anfängen nämlich beim Laden und öffnen eines Bildes in der PaintBox, klappt auch soweit, habe das wie folgt gemacht:
Delphi-Quellcode:
procedure Tfrmpaintmaster.ffnen1Click(Sender: TObject);
var
Bild:TBitmap;
begin
if OpenPictureDialog.execute then
begin
Bild := TBitmap.Create;
Bild.LoadFromFile (OpenPictureDialog.FileName);
with PaintBox do
begin
Canvas.Draw(0,0,Bild);
PaintBox.Width := Bild.Width;
PaintBox.Height := Bild.Height;
end;
end;
end;
Mein Problem ist jetzt das wenn ich sage Öffnen und ich das Bild aussuche dann sehe ich das Bild noch nicht, also es wird nicht angezeigt, sondern erst wenn ich es zum zweitenmal öffne, dann sehe ich es wie es sein soll.
Habe es schon mit Refresh probiert, aber das klappt auch nicht.
Maine Frage jetzt was mache ich falsch oder habe ich was vergessen ?
Gruss
Darkchild
Ich bin der Geist der stets verneint und das mit recht, denn alles was entsteht ist wert das es zugrunde geht, drum besser wär das nichts entstünde, so ist denn alles was ihr Sünde, Zerstörung, kurz das Böse nennt, mein eigendliches Element.