ComboBox

Du skal lave et object og så bruge addobject.

Type
TSkjult = class(TObject)
  Vaerdi : string;
end;


....

Var
Skjult : TSkjult;
begin
Skjult := TSkjult.Create;
Skjult.Vaerdi := 'Hemlig...';
Combobox1.AddObject('Nr.', Skjult);
end;

...

Var
Skjult : TSkjult;
begin
Skjult := pointer(Combobox1.Objects[Combobox1.itemindex]);
showmessage('Skjult tekst: '+Skjult.Vaerdi);
end;


Ok det kan indeholde små fejl da jeg bare har skrevet fra hovedet....

Der skal stå: combobox1.items.objects[xxx]

Men her er noget man osse kan:
    ...
    cmbPostNumre.addobject ('Esbjerg',pointer(6700) );
    cmbPostNumre.addobject ('Århus',pointer(8000) ); //max 32 bit
    ...
    ix:=cmbPostNumre.itemindex;
    showmessage('Nummer for '+cmbPostNumre.items[ix]+' er '
                +intToStr(integer(cmbPostNumre.items.objects[ix])));

Du skal dog bruge objekt metoden hvis det er lidt mere komplexe data.
Enten som et array af objekt typen (fx Tskjult), eller ved at oprette objekterne enkeltvis, husk at bruge create of free.

hmm jeg er lidt på bar bund.. jeg er først lige begyndt på Delphi, brugte tidligere Turbo-Pascal i en kort periode. hvis i gad skære det lidt mere ud i pap ville det være fedt(0= tak!

Måske dette kan bruges : (Taget fra Delphi hjælp filen)
TStrings.Values

Represents the value part of a string associated with a given Name, on strings with the form Name=Value.

property Values[const Name: string]: string;

Description

When the list of strings for the TStrings object includes strings of the form Name=Value, use Values to get or set the value part of a string associated with a specific name part. If the list does not contain any strings of the proper Name=Value form, or if none of those strings matches the Name index, Values returns an empty string.

Note:    The Name index is case-insensitive. That is, Values is the value part for the first occurrence of Name or an equivalent string that differs only in case.

Strings of the form Name=Value are commonly found in .INI files. For example, here are a few strings taken from a DELPHI.INI file:

DisplayGrid=1

SnapToGrid=1
GridSizeX=8
GridSizeY=8

The strings that make up the Params property of a database component (TDatabase) have this format as well.

The Name that identifies the string is to the left of the equal sign (=), and the current Value of the Name identifier is on the right side. There should be no spaces present before or after the equal sign.