Модераторы: Poseidon, Snowy, bems, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Помогите справиться с OpenDialog! Никак не могу понять, чего он 
V
    Опции темы
kulikoff
Дата 2.2.2006, 12:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

Репутация: нет
Всего: 1
Помогите, пожалуйста!
Надо в прогу вставить OpenDialog. вроде поствил, открывает его, а когда выбираю файл - матюкается, что файл инвалид и при этом пытается открыть файл с ещё одним разрешением. В общем, выводит сообщение: Invalid file name. File: D:\"10450131.DBF".DBF'.
Я просто потом хочу имя файла подставить в запросы и т.д...
PM MAIL WWW ICQ Skype   Вверх
Rennigth
Дата 2.2.2006, 12:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76
код приведи как ты вызываешь OpenDiaolg


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
kulikoff
Дата 2.2.2006, 12:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

Репутация: нет
Всего: 1
Код

if sOpenDialog1.Execute
then
  begin
    Table2.TableName:=sOpenDialog1.FileName;
    Table2.TableType:=ttFoxPro;
    Table2.Active:=true;
    k:='select KEYBANK, ZKPO, S, BANK_ND, NPL, BANK_DD, BANK_DAT, MFO_PL, NAIM_PL from "' + Table2.TableName +'"';
  end
else exit;
PM MAIL WWW ICQ Skype   Вверх
Rennigth
Дата 2.2.2006, 12:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76
ты маску наверное неправильно задаешь, тебе нужны только чтобы видны DBF?


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
kulikoff
Дата 2.2.2006, 12:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

Репутация: нет
Всего: 1
Да, пишу в фильтре *.dbf. Разве это неправильно?
PM MAIL WWW ICQ Skype   Вверх
_hunter
Дата 2.2.2006, 12:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98
вот это место и покажи


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Grig
Дата 2.2.2006, 12:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 809
Регистрация: 29.4.2005
Где: Иркутск

Репутация: нет
Всего: 16
С кавычками скорей всего проблема.. Попробуй их убрать вообще..


--------------------
        
PM MAIL ICQ   Вверх
Rennigth
Дата 2.2.2006, 12:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76
Код

var
  lOpenDialog: TOpenDialog;
begin
  lOpenDialog := TOpenDialog.Create(nil);
  lOpenDialog.Filter := '*.dbf|*.dbf';
  if lOpenDialog.Execute then
  begin
    Table2.TableName:=lOpenDialog.FileName;
    Table2.TableType:=ttFoxPro;
    Table2.Active:=true;
    k:='select KEYBANK, ZKPO, S, BANK_ND, NPL, BANK_DD, BANK_DAT, MFO_PL,   NAIM_PL from "' + Table2.TableName +'"';
  end;
  lOpenDialog.Free;




--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
MIX55
Дата 2.2.2006, 12:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


много работы
*


Профиль
Группа: Awaiting Authorisation
Сообщений: 208
Регистрация: 23.10.2005
Где: Здесь

Репутация: 3
Всего: 4
Попробуй написать *.dbf в DefaultExt. И попробовать свой пример
--------------------
Hарод, а как в дельфи писать паскалевские проги....?*********************************************Жизнь слишком коротка, чтобы писать на Assembler'e
PM MAIL ICQ   Вверх
Grig
Дата 2.2.2006, 12:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 809
Регистрация: 29.4.2005
Где: Иркутск

Репутация: нет
Всего: 16
или используй одинарные кавычки,
Я, например однажды таким образом извращался
Код

'WHERE fl_p='+''''+'0'+''''+
' ORDER BY code_pc ASC';



--------------------
        
PM MAIL ICQ   Вверх
kulikoff
Дата 2.2.2006, 12:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

Репутация: нет
Всего: 1
Я понял, он в самом окне открытия файла чего- к имени файла иещё и кавычки прикручивает... Как это убрать?
PM MAIL WWW ICQ Skype   Вверх
_hunter
Дата 2.2.2006, 13:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 8564
Регистрация: 24.6.2003
Где: Europe::Ukraine:: Kiev

Репутация: 15
Всего: 98
не должен он подставлять ничего. посмотри отладчико что куда приходит


--------------------
Tempora mutantur, et nos mutamur in illis...
PM ICQ   Вверх
Grig
Дата 2.2.2006, 13:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 809
Регистрация: 29.4.2005
Где: Иркутск

Репутация: нет
Всего: 16
Да ну на фиг! Нигде он их не прикручивает:
Код

if OpenDialog1.Execute then showmessage(ExtractFileName(OpenDialog1.FileName));

Это ты по ходу их в запросе прикручиваешь, на это и ругань вся идет.


--------------------
        
PM MAIL ICQ   Вверх
kulikoff
Дата 2.2.2006, 14:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

Репутация: нет
Всего: 1
да не, диалог эти кавычки двойные прикручивает ещё в окне, где я файл выбираю... Вручную их удаляю и всё работает
PM MAIL WWW ICQ Skype   Вверх
Rennigth
Дата 2.2.2006, 15:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76
kulikoff
Что-то бред какой-то, наверное ты что-то напутал при ручной настройке в DesignTime с Dialog-ом. Попробуй его создавать динамически(см. мой второй пост) или удали и заного кинь на форму и в фильтре поставь *.dbf|*.dbf.


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0757 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.