Einzelnen Beitrag anzeigen

torud

Registriert seit: 26. Jul 2002
Ort: Sachsen
1.198 Beiträge
 
Delphi XE5 Professional
 
#11

Re: TImage zur Laufzeit mit weiteren Properties ausstatten

  Alt 13. Jun 2007, 13:10
Ich habe es gerade nochmal getestet und der FormDesigner von Greatis.com speichert wirklich alle möglichen Controls, die sich auf dem Formular befinden, so auch mein erzeugtes Testpic:

Delphi-Quellcode:
  object testpic: TMyImage
    Left = 0
    Top = 0
    Width = 105
    Height = 105
    Picture.Data = {
      0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000005600
      //usw...
Aber die 2 neuen Eigenschaften speichert er leider nicht. Hat das einen Grund?

Delphi-Quellcode:
type
  TMyImage=class(TImage)
  public
    new_width:integer;
    angle:integer;
    //Methoden fehlen hier auch noch
  end;
Ich übergebe Ihnen schon Daten, aber sie werden einfach nicht gespeichert:

Delphi-Quellcode:
      myDestImage.Picture.Graphic.Assign(x);
      myDestImage.new_width := ScrollBar2.Position;
      myDestImage.angle := ScrollBar1.Position;
Danke
Tom
  Mit Zitat antworten Zitat