Results 1 to 2 of 2

Thread: ListBox in een keer naar een bepaalde regel gaat

Hybrid View

  1. #1

    ListBox in een keer naar een bepaalde regel gaat

    Hallo allemaal,

    In een ListBox staat een lange lijst met Namen (gesorteerd). Hoe kan ik in een keer naar de eerste naam
    gaan welke begint met een 'B'?

    Het is niet de bedoeling dat er na de selectie alleen maar de namen welke met een 'B' beginnen overblijft.
    M.a.w. de lijst blijft intact.

    Met een vriendelijke groet, Frans

  2. #2
    Silly member NGLN's Avatar
    Join Date
    Aug 2004
    Location
    Werkendam
    Posts
    5,108
    ListBox.Items is van het type TStrings, dus dat zou op een redelijk simpele manier op de volgende manier kunnen:

    Delphi Code:
    1. uses
    2.   .., System.StrUtils;
    3.  
    4. procedure TForm1.SelectListBoxText(const AText: String);
    5. var
    6.   I: Integer;
    7. begin
    8.   for I := 0 to ListBox1.Count - 1 do
    9.     if StartsStr(AText, ListBox1.Items[I]) then
    10.     begin
    11.       ListBox1.ItemIndex := I;
    12.       Break;
    13.     end;
    14. end;
    Hieraan zou je nog kunnen toevoegen:
    - of de gezochte tekst case-sensitive moet overeenkomen, zo niet gebruik dan StartsText,
    - welk item geselecteerd moet blijven dan wel worden, of geen (-1), wanneer de tekst niet gevonden wordt.
    (Sender as TNLDUser).Signature := 'Groeten van Albert';

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •