Einzelnen Beitrag anzeigen

Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#3
  Alt 30. Mär 2003, 19:27
hoi,

danke für die hilfe

klappt bei mir aber irgendwie nicht, hab das so:


Delphi-Quellcode:
procedure AlphaBlendCount(Sender: TObject);
var i: integer;
begin
  InfoTimer.Enabled := True;
  if i <> 255 then
  begin
  i := i + 3;
  InfoForm.AlphaBlendValue := i;
  end
  else InfoTimer.Enabled := False;
end;

und zum aufrufen des timers das:

Delphi-Quellcode:
  with TTimer.Create(InfoForm) do
  begin
    InfoTimer.Enabled := False;
    InfoTimer.Interval := 5;
    InfoTimer.OnTimer := AlphaBlendCount;
  end;
fehlermeldung ist "[Fehler] Unit1.pas(385): Inkompatible Typen: 'Methodenzeiger und reguläre Prozedur'"

Mario
  Mit Zitat antworten Zitat