Nur zum Testen, kannst Du die
Unit auch in ein Projekt einbinden und händisch erstellen.
Delphi-Quellcode:
uses
UFadeForm;
procedure Test;
var
lFadeForm: TFadeForm;
begin
lFadeForm := TFadeForm.CreateNew(nil);
lFadeForm.FadeIn := true;
lFadeForm.FadeOut := true;
lFadeForm.Show;
sleep(10000);
lFadeForm.Free;
end;
und bezüglich
[Fehler] UFadeForm.pas(14): E2170 Eine nichtvirtuelle Methode kann nicht überschrieben werden
[Fehler] UFadeForm.pas(15): E2170 Eine nichtvirtuelle Methode kann nicht überschrieben werden
überschreibst Du am besten die Methoden DoShow bzw. DoHide, die sind in TCustomForm als Protected deklariert, kannst Du also auch in deiner TFadeForm dort deklarieren (Ich hoffe das hat sich von D7Pro zu D2005PE nicht geändert).