Komponente -Procedur sichtbar bei Benutzung-

[Dragon27]

Hallo,

also irgendwie funct das alles nicht:

Delphi-Quellcode:

unit Login;

interface

uses
  SysUtils, Classes, inifiles, Dialogs;

type
  TLogin = class(TComponent)
  private
    { Private-Deklarationen }
    cPfad:String;
    cDateiname:String;
    cCode:String;

    ini:Tinifile;
    Procedure SetPath(Path:String);
    function  Decode(Data, SecurityString: string): string;
    function  Encode(Data, SecurityString: string; MinV: Integer = 0;
  MaxV: Integer = 5): string;
  function MakeRNDString(Chars: string; Count: Integer): string;
  Procedure SetDateiname(Datei:String);
  Procedure SetCode(Code:String);

  protected
    { Protected-Deklarationen }
  public
    { Public-Deklarationen }

  published
    { Published-Deklarationen }
    property Pfad : String read cPfad write SetPath;
    property Dateiname : String read CDateiname write SetDateiname;
    property Code : String read CCode write SetCode;
   public Procedure NewUser(Name:String;Passwort:String); //SOLL SICHTBAR SEIN
   public Function  PasswortValid(Name,Passwort:String):Boolean; //SOLL SICHTBAR SEIN
  end;

Danke!