Skifte makering i listbox

Tags:    delphi

Hej udviklere,

Jeg har en listbox som indeholder nogle navne. Når man klikker på et navn kan man se yderligere oplysninger om personen i en memo.
Når jeg trykker på pil nedad i min listbox springer den en linje ned.
Er det muligt at få den funktion tilknyttet en button?

På forhånd tak for hjælpen

Mvh
Anders



3 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma
Sorter efter stemmer Sorter efter dato
Hej udviklere,

Jeg har en listbox som indeholder nogle navne. Når man klikker på et navn kan man se yderligere oplysninger om personen i en memo.
Når jeg trykker på pil nedad i min listbox springer den en linje ned.
Er det muligt at få den funktion tilknyttet en button?

På forhånd tak for hjælpen

Mvh
Anders


Hvilken vej rundt så den går ned ved hjælp af button eller tasten pil ned svare til klik på button ?

M.v.h. Johnny Rasmussen



Hej udviklere,

Jeg har en listbox som indeholder nogle navne. Når man klikker på et navn kan man se yderligere oplysninger om personen i en memo.
Når jeg trykker på pil nedad i min listbox springer den en linje ned.
Er det muligt at få den funktion tilknyttet en button?

På forhånd tak for hjælpen

Mvh
Anders


Hvilken vej rundt så den går ned ved hjælp af button eller tasten pil ned svare til klik på button ?

M.v.h. Johnny Rasmussen



Altså min button skal når man trykker på den, gøre det samme som hvis man trykker pil ned i listbox'en.

Mvh
Anders



Jeg har selv fundet ud af det og for ikke at være som mange herinde vil jeg da lige give jer svaret.

ListBox1.ItemIndex := ListBox1.ItemIndex + StrToInt('+1');

og hvis man skal den anden vej bruger man '-1', men hvis man er på øverste linje i listbox'en og trykker en linje op crasher programmet. Derfor brug følgende:

If ListBox1.ItemIndex = 0 then
exit

Mvh
Anders



t