Einzelnen Beitrag anzeigen

formosa

Registriert seit: 8. Apr 2006
Ort: Shanghai
29 Beiträge
 
Delphi 7 Professional
 
#4

Re: Layer Management auf OOP Basis

  Alt 28. Jun 2008, 23:38
Danke euch beiden. Ja so ungefähr hab ich mir das auch vorgestellt, wollte aber die ganzen Layers etwa wie folgt ansprechen

Delphi-Quellcode:
if MyLayers.Layer [idx].Type = BitmapLayer then
begin
  .... // mach ich was damit.
end
else
begin
  .... // mach ich halt was anderes damit.
end;
Grundsäztlich würde ich sagen das ich die variablen wie Offset, Text ect. in zwei verschiedenen Arrays speichern kann. Wie könnte ich denn jetzt eine Klasse gestalten damit ich von aussen beispielsweise in einem BitmapLayer mit keine Eigenschaft Text habe also zb.

Delphi-Quellcode:
if MyLayers.Layer [idx].Type = BitmapLayer then
begin
  MyLayers.Layer [idx].Text := 'Neuer Text'; // Es sollte aber keine Text Eigenschaft haben
end
else
begin
    MyLayers.Layer [idx].Text := 'Neuer Text'; // Hier jedoch schon
end;
Das ist mein eigentliches Hauptproblem.

danke

Chris
  Mit Zitat antworten Zitat