|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.107 Beiträge
Delphi 11 Alexandria
|
Re: Einblenden
4. Jul 2004, 20:49
Moin Delirium,
dazu mal ein kleines Beispiel:
Im OI AlphaBlend auf true, und dann:
Delphi-Quellcode:
procedure TForm1.FormPaint(Sender: TObject);
var
iIndex : integer;
begin
for iIndex := 0 to 255 do begin
AlphaBlendValue := iIndex;
end;
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|