/
Forside
/
Teknologi
/
Udvikling
/
Delphi/Pascal
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
Delphi/Pascal
#
Navn
Point
1
oldwiking
603
2
jrossing
525
3
rpje
520
4
EXTERMINA..
500
5
gandalf
460
6
gubi
270
7
DJ_Puden
250
8
PARKENSS
230
9
technet
210
10
jdjespers..
200
Template...
Fra :
Henning E. Lund
Dato :
05-04-02 10:24
Hej
Kan man i Delphi 5 interprise versionen lave en template - noget i stil med
den man har i C++.
Jeg har nemlig en TList hvori jeg på design tidspunktet ikke ved hvad der
skal i listen. Det ved jeg kun i runtime...
Så ville det være godt, hvis man kunne lave en Template på en TList.
Elementerne i TList vil blive klasser...men det er lidt træls at lave en kø
til hver af de klasser der nu engang repræsenteres i min datamodel.
Håber I kan hjælpe.
mvh.
Henning.
David A. D. Konrad (
05-04-2002
)
Kommentar
Fra :
David A. D. Konrad
Dato :
05-04-02 15:34
"Henning E. Lund" <enemark@mail.NOSPAMnet4you.dk> skrev i en meddelelse
news:3cad6d18$0$68805
> Kan man i Delphi 5 interprise versionen lave en template - noget i stil
med
> den man har i C++.
Nej.
> Jeg har nemlig en TList hvori jeg på design tidspunktet ikke ved hvad der
> skal i listen. Det ved jeg kun i runtime...
Du ved da, at det under alle omstændigheder vil være et object af typen
TObject...?
> Så ville det være godt, hvis man kunne lave en Template på en TList.
> Elementerne i TList vil blive klasser...men det er lidt træls at lave en
kø
> til hver af de klasser der nu engang repræsenteres i min datamodel.
?? Jeg ville lave en specialisering af TList, hvor der implementereredes
indexbaserede getter/setter metoder for dé specielle klasse-typer som ønskes
gemt i listen. F.eks kunne man have en speciel klasse indeholdene en integer
og en boolean man gerne ville kunne gemme og hente hurtigt fra en TList :
type
TSpecialClass = class
private
Fbool: boolean;
Fint: integer;
procedure Setbool(const Value: boolean);
procedure Setint(const Value: integer);
public
property int:integer read Fint write Setint;
property bool:boolean read Fbool write Setbool;
end;
Du laver så en TList specialisering, hvor elementer af denne type kan sættes
eller hentes via et index :
THenningList = class(TList)
private
function GetSpecialClass(index: integer): TSpecialClass;
procedure SetSpecialClass(index: integer; const Value: TSpecialClass);
protected
public
published
property SpecialClass[index:integer]:TSpecialClass read GetSpecialClass
write SetSpecialClass;
end;
Henning E. Lund (
06-04-2002
)
Kommentar
Fra :
Henning E. Lund
Dato :
06-04-02 07:26
Takker.....
"David A. D. Konrad" <david_konrad@hotmail.dk> skrev i en meddelelse
news:3cadb3f1$0$68778$edfadb0f@dspool01.news.tele.dk...
> "Henning E. Lund" <enemark@mail.NOSPAMnet4you.dk> skrev i en meddelelse
> news:3cad6d18$0$68805
>
> > Kan man i Delphi 5 interprise versionen lave en template - noget i stil
> med
> > den man har i C++.
>
> Nej.
>
> > Jeg har nemlig en TList hvori jeg på design tidspunktet ikke ved hvad
der
> > skal i listen. Det ved jeg kun i runtime...
>
> Du ved da, at det under alle omstændigheder vil være et object af typen
> TObject...?
>
> > Så ville det være godt, hvis man kunne lave en Template på en TList.
> > Elementerne i TList vil blive klasser...men det er lidt træls at lave en
> kø
> > til hver af de klasser der nu engang repræsenteres i min datamodel.
>
> ?? Jeg ville lave en specialisering af TList, hvor der implementereredes
> indexbaserede getter/setter metoder for dé specielle klasse-typer som
ønskes
> gemt i listen. F.eks kunne man have en speciel klasse indeholdene en
integer
> og en boolean man gerne ville kunne gemme og hente hurtigt fra en TList :
>
> type
> TSpecialClass = class
> private
> Fbool: boolean;
> Fint: integer;
> procedure Setbool(const Value: boolean);
> procedure Setint(const Value: integer);
> public
> property int:integer read Fint write Setint;
> property bool:boolean read Fbool write Setbool;
> end;
>
> Du laver så en TList specialisering, hvor elementer af denne type kan
sættes
> eller hentes via et index :
>
> THenningList = class(TList)
> private
> function GetSpecialClass(index: integer): TSpecialClass;
> procedure SetSpecialClass(index: integer; const Value: TSpecialClass);
> protected
> public
> published
> property SpecialClass[index:integer]:TSpecialClass read
GetSpecialClass
> write SetSpecialClass;
> end;
>
>
>
>
Søg
Alle emner
Teknologi
Udvikling
Delphi/Pascal
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177552
Tips :
31968
Nyheder :
719565
Indlæg :
6408849
Brugere :
218887
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.