data man Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Код:   // фильтр задан как '*.*|*.*|txt|*.txt|doc|*.doc' var   I: Integer;   OD: TOpenDialog; begin   OD := (Sender as TOpenDialog);   I := OD.FilterIndex;   if I = 1 then       OD.FileName := '1.1';   if I = 2 then       OD.FileName := '1.txt';   if I = 3 then       OD.FileName := '1.doc';   memo1.Lines.Append(OD.FileName); end; Всего записей: 1696 | Зарегистр. 13-10-2005 | Отправлено: 11:10 21-08-2009 | Исправлено: data man, 11:14 21-08-2009

На первую страницу • к этому сообщению • к последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (до версии 2009) - часть 5

ShIvADeSt (19-05-2010 05:14): Продолжаем тут http://forum.ru-board.com/topic.cgi?forum=33&topic=11215

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование