Hi ,
ich hab ein Problem mit einer routine .
Wieso kann ich auf einem fsMDIChild mit dieser Routine kein Bild darstellen?
Delphi-Quellcode:
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var bild1: TBitmap;
begin
bild1 := TBitmap.Create;
try
bild1.LoadFromFile('test.bmp');
Form1.Canvas.Draw(x,y,bild1);
finally
bild1.Free;
end;
end;