Deklarationen II

[Hellcat]

Hmm, das hat irgendwie keine Wirkung gehabt...

ich kriege immer noch die gleiche Fehlermeldung...

Delphi-Quellcode:

uses SysUtils, ExtCtrls, StdCtrls, Controls, Classes, Graphics, Dialogs,Forms,
     unittype;
  {Standard-Units auf die zurückgegriffen wird}

    procedure Farbewechseln (Sender: TPanel; Button: TMousebutton);
    function Zeitangabe:string;
    function THL (Sender: TImage; Button: TMousebutton; Bild: boolean): boolean;
    function Sound (Sender: TImage; Button: TMousebutton; Bild: boolean): boolean;
    function Schloss (Sender: TImage; Button: TMousebutton; Bild: boolean): boolean;
    procedure speichern;
    function laden : string;
    procedure zerlegen (Zeile:string);
  type
    TForm1 = class(TForm);
    THLPan1 = TImage;

       BildTHL[i] := THL (Form1.THLPan[i],Button,BildTHL[i]);