VPF::ListBox, указатель - Форум программистов

MoLeX

Дата 5.5.2009, 08:52 (ссылка)

(нет голосов)

Загрузка ...

Местный пингвин

Профиль
Группа: Модератор
Сообщений: 4076
Регистрация: 17.5.2007

Репутация: 1
Всего: 140

Привет.

Заполняю ListBox следующим образом

Код


        String ProgSkins = "Vista";
        String ProgDir = ExtractFilePath(Application -> ExeName);

        TSearchRec SearchRec;
        ChDir(ProgDir);
        if( FindFirst("*.asz", faArchive, SearchRec) == 0)
        {
                do
                {
                        AnsiString fname = ProgDir + "\\" + SearchRec.Name;
                        fname = StringReplace(fname, ".asz", "", TReplaceFlags() <<rfReplaceAll);
                        ListBox -> Items -> Add( fname.Delete(1, 1) );
                }
                while ( FindNext(SearchRec) == 0 );
        }

не могу сообразить как поставить указатель на запись совпадающей с переменной.

--------------------

Amazing

mrbrooks

Дата 5.5.2009, 09:20 (ссылка)

(нет голосов)

Загрузка ...

трололомен

Профиль
Группа: Завсегдатай
Сообщений: 4259
Регистрация: 4.10.2006
Где: Дол Гулдур

Репутация: 167
Всего: 306

Код


        TSearchRec sr;
        if( !FindFirst("*.asz", faAnyFile|faDirectory, sr))
        {
              ListBox -> Items -> Add( StringReplace(sr.Name, ".asz", "", TReplaceFlags() <<rfReplaceAll) );
              while (!FindNext(sr))
                        ListBox -> Items -> Add( StringReplace(sr.Name, ".asz", "", TReplaceFlags() <<rfReplaceAll) );
        }
         FindClose(sr);

Это сообщение отредактировал(а) mrbrooks - 5.5.2009, 09:23

MoLeX

Дата 5.5.2009, 09:30 (ссылка)

(нет голосов)

Загрузка ...

Местный пингвин

Профиль
Группа: Модератор
Сообщений: 4076
Регистрация: 17.5.2007

Репутация: 1
Всего: 140

не то)

т.е. во время построения списка надо проверить совпадает ли название файла с переменной ProgSkins (String ProgSkins = "Vista"), если да то надо на это название поставить фокус. чтобы вот что получилось в итоге:

Это сообщение отредактировал(а) MoLeX - 5.5.2009, 09:31

--------------------

Amazing

mrbrooks

Дата 5.5.2009, 09:44 (ссылка)

(нет голосов)

Загрузка ...

трололомен

Профиль
Группа: Завсегдатай
Сообщений: 4259
Регистрация: 4.10.2006
Где: Дол Гулдур

Репутация: 167
Всего: 306

Код


       TSearchRec sr;
       String str = "Vista";
        if( !FindFirst("*.asz", faAnyFile|faDirectory, sr))
        {
              ListBox -> Items -> Add( StringReplace(sr.Name, ".asz", "", TReplaceFlags() <<rfReplaceAll) );
              while (!FindNext(sr))
                        ListBox->Items->Add( StringReplace(sr.Name, ".asz", "", TReplaceFlags() <<rfReplaceAll) );
              ListBox->ItemIndex =  ListBox->Items->IndexOf(str);
        }
         FindClose(sr);

Это сообщение отредактировал(а) mrbrooks - 5.5.2009, 09:46

MoLeX

Дата 5.5.2009, 10:46 (ссылка)

(нет голосов)

Загрузка ...

Местный пингвин

Профиль
Группа: Модератор
Сообщений: 4076
Регистрация: 17.5.2007

Репутация: 1
Всего: 140

mrbrooks, спасибо, то что надо smile

Добавлено через 11 секунд
+1 =)

--------------------

Amazing

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »