hmmm...das ist jetzt eine sehr unschöne methode, aber so würd ich es machen...
Delphi-Quellcode:
var
Form1: TForm1;
Form2: TForm;
implementation
(...)
procedure TForm1.Button1Click(Sender: TObject);
var bild:TImage;
begin
bild:=TImage.Create(self);
Form2:=TForm.Create(self);
with form2 do
begin
borderstyle:=bsnone;
top:=0; left:=0;
width:=screen.width;
height:=screen.Height;
parent:=form2;
end;
bild.Parent:=form2;
bild.Align:=alclient;
bild.Picture.LoadFromFile('C:\hallo.bmp');
bild.Stretch:=true;
form2.Show;
form1.Hide;
end;
(...)
//die form kann dann wieder mit einem timer vernichtet werden...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Form2.Close;
Form1.Show;
end;
noch fragen?