AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

StringList in eigener Klasse

Ein Thema von youuu · begonnen am 26. Aug 2010 · letzter Beitrag vom 26. Aug 2010
Antwort Antwort
Seite 1 von 2  1 2      
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.874 Beiträge
 
Delphi 11 Alexandria
 
#1

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 14:36
Delphi-Quellcode:
type
  TMyClass = class
    private
      Fsl: THashedStringList; // Links
    public
      property sl: THashedStringList read Fsl write Fsl;
      procedure addSl(content: string);
    end;

procedure addSl(content: string);
Begin
  if Assigned( Fsl) then Fsl.add(content);
end;
-In den Methoden auf die realen Felder zugreifen
-Vorher überprüfen, ob die Eigenschaft zugewiesen ist
Markus Kinzler
  Mit Zitat antworten Zitat
youuu

Registriert seit: 2. Sep 2008
Ort: Kleve
822 Beiträge
 
Delphi 2010 Professional
 
#2

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 14:51
if Assigned(FslLink_id) then FslLink_id.add('sss'); Wird aber nie durch laufen, da anscheinend ja die StringList nicht existiert für die Klasse.
Wo muss ich die Stringlist erstellen, damit Sie für die ganze Klasse zur Verfügung steht?

Im Constructor bringt es nichts
Steven
  Mit Zitat antworten Zitat
Benutzerbild von mleyen
mleyen

Registriert seit: 10. Aug 2007
609 Beiträge
 
FreePascal / Lazarus
 
#3

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 14:54
Delphi-Quellcode:
procedure addSl(content: string);
Begin
  if not Assigned( Fsl) then
    Fsl := THashedStringList.Create;
  Fsl.add(content);
end;
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.659 Beiträge
 
Delphi 12 Athens
 
#4

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 14:56
Oder wenn sie in jedem Fall gebraucht wird, im Konstruktor anlegen und im Destruktor wieder freigeben.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
youuu

Registriert seit: 2. Sep 2008
Ort: Kleve
822 Beiträge
 
Delphi 2010 Professional
 
#5

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 14:59
Delphi-Quellcode:
constructor TMyClass.Create;
Var
  Fsl: THashedStringList;
Begin
  Fsl.Create;
End;
Brachte leider auch nicth den Erfolg, denn das habe ich schon versucht.
Denn:
if Assigned(Fsl) then läuft nicht durch.




Edit:

Zitat:
Delphi-Quellcode:
type
  TMyClass = class
    private
      Fsl: THashedStringList; // Links
    public
      property sl: THashedStringList read Fsl write Fsl;
      procedure addSl(content: string);
    end;

procedure TmyClass.addSl(content: string);
Begin
  sl.add(content);
end;
Hatte ich doch schon
Steven
  Mit Zitat antworten Zitat
Benutzerbild von mleyen
mleyen

Registriert seit: 10. Aug 2007
609 Beiträge
 
FreePascal / Lazarus
 
#6

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 15:02
goto: Post#2
  Mit Zitat antworten Zitat
Benutzerbild von implementation
implementation

Registriert seit: 5. Mai 2008
940 Beiträge
 
FreePascal / Lazarus
 
#7

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 15:08
Delphi-Quellcode:
constructor TMyClass.Create;
Var
  Fsl: THashedStringList;
Begin
  Fsl.Create;
End;
Wie wärs denn mal mit:
Delphi-Quellcode:
constructor TMyClass.Create;
Begin
  Fsl := THashedStringList.Create;
End;

Geändert von implementation (26. Aug 2010 um 15:11 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.659 Beiträge
 
Delphi 12 Athens
 
#8

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 15:09
Und noch ein Verweis auf #2. Ist der irgendwie weiß auf weiß, oder weshalb wird das ständig überlesen?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.874 Beiträge
 
Delphi 11 Alexandria
 
#9

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 15:09
Wenn schon:
Fsl := THashedStringList.Create; Das steht so aber schon alles in Detlefs Beitrag, auf den schon mehrmals hingewiesen wurde!
Markus Kinzler
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.874 Beiträge
 
Delphi 11 Alexandria
 
#10

AW: StringList in eigener Klasse

  Alt 26. Aug 2010, 14:56
Da das ja keine interne Liste ist, sondern extern zugewisen werden kann, kann man sich so einen schönen Leak basteln
Markus Kinzler
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:06 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz