Einzelnen Beitrag anzeigen

Dax
(Gast)

n/a Beiträge
 
#4

Re: OOP Problem: kein Zugriff auf Prozeduren

  Alt 1. Nov 2004, 16:57
Versuchs doch mal mit einer Standardmäßigen Typ-Deklaration:
Delphi-Quellcode:
type
TObjekt1 = class
 private
  FTyp:String;
  FUsed:Boolean;
  FItems:Array [1..100] of String;
  FName:String;
  FAktion:String;
  FBild:String;
  FX:Integer;
  FY:Integer;
 published
  procedure WriteTyp(Variable:String);
  procedure WriteUsed(Variable:Boolean);
  procedure WriteItem(Item:String; Position:Integer);
  procedure WriteName(Name:String);
  procedure WriteAktion(Aktion:String);
  procedure WriteBild(Bild:String);
  procedure WriteX(x:integer);
  procedure WriteY(y:Integer);
  function GetTyp:String;
  function GetUsed:Boolean;
  function GetItem(position:integer):String;
  function GetName:String;
  function GetAktion:String;
  function GetBild:String;
  function GetX:Integer;
  function GetY:Integer;
  property Typ : String Read FTyp Write FTyp;
end;
Die Unterscheidet sich zwar kaum von der anderen, aber wenn es so nicht funktioniert, weiss ich auch nicht mehr weiter.
  Mit Zitat antworten Zitat