Hintergrundbilder

Sisco

Moin Leute,

mal 2 Fragen...

... Wie bekomme ich auf einem normalem Formular ein .jpg als Hintergrund.

... Das selbe auf einem Button

Kann auch ein .gif sein.

Nur noch kurz zur Info: Ich habe einen Biulder von 1997

Hi.
Zu erstens: Guck dir mal TImage an.
Zu zweitens: Guck dich mal Torry.net oder so um.
MfG Aoeke

Jester2000

das Hintergrundbild kannst du so hinbekommen:

#include <JPEG.hpp>
TJPEGImage *jpg;
.
.
.
void __fastcall TForm1::FormCreate(TObject *Sender)
{ jpg = new TJPEGImage();
  jpg->LoadFromFile("...");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormPaint(TObject *Sender)
{ Form1->Canvas->Draw(0,0,jpg);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{ delete jpg;
}