Einzelnen Beitrag anzeigen

Clane
(Gast)

n/a Beiträge
 
#14

Re: TForm im aussehn ändern?

  Alt 24. Nov 2007, 10:11
soweit funktioniert das alles danke dafür schonmal aber ich bekomme das nicht compiliert ....

Zitat:
[DCC Fehler] Unit1.pas(54): E2008 Inkompatible Typen
betreffende stelle

Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);

begin
  Color := clRed;

  try
        //Bitmap erstellen
    

//Fehler
AssignFile(Bmp, 'testbmp.bmp');
//Fehler
 

   //Größe des Formulars an Bitmap anpassen
    ClientHeight := Bmp.Height;
    ClientWidth := Bmp.Width;

    //Region erstellen
    RGN := CreateRGN(Bmp, Bmp.Canvas.Pixels[0, 0]);

    //Zeichenbereich eines Fensters setzen
    SetWindowRGN(Handle, RGN, True);
  finally
    Bmp.Free;
  end;
end;

end.
  Mit Zitat antworten Zitat