News Information System 1.0 - Vorstellung

[fabic42]

Danke, shark für deine GUTEN Ideen! Das mit dem automatischen Refresh ist bereits drinn. Wie ich das mit dem FadeIn mache?

Delphi-Quellcode:

var i : integer;
    gStdAlpha  : integer;
begin
   i := 0;
   gStdAlpha := 234; 
   while i < gStdAlpha do
   begin
      AlphaBlendValue := i;
      sleep(18);
      inc(i,5);
   end;
end;

Gruß Fabic!