Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как записать путь к файлу в БД, используя OpenDialog? [D7, Access]


Zif ©   (2004-10-15 23:16:00) 

Мастера! Подскажите как записать путь к файлу (C:\Программы\1.exe) в БД, используя OpenDialog?
Привожу несколько примеров, все не рабочие... где ошибка?
Запись должна отобразиться в DBEdit.

procedure TFormMain.ButtonClick(Sender: TObject);
begin
 if OpenDialog.Execute then
 DataModule1.ADODataSetUserLocation:=OpenDialog.FileName;
end;


procedure TFormMain.ButtonClick(Sender: TObject);
begin
 if OpenDialog.Execute then
 DataModule1.ADODataSetUserLocation:=LoadFromFile(OpenDialog.FileName);
end;


procedure TFormMain.ButtonClick(Sender: TObject);
begin
 if OpenDialog.Execute then
 DBEdit.Text:=OpenDialog.FileName;
end;


и сразу второй вопрос - как относительный путь записать (\Программы\1.exe)?


sniknik   (2004-10-16 13:27:00) [1]

> я новичок
твои проблемы, возьми книжку и почитай.

> 2. как запустить этот файл?
WinExec самое простое

> 1. как записать относительный путь (\Программы\1.exe)?
сравнить полученый с путем программы и изменить, записывать после.


Zif   (2004-10-16 13:13:00) [2]

и еще 2 вопроса:
1. как записать относительный путь (\Программы\1.exe)?
2. как запустить этот файл?
я новичок


Zif   (2004-10-16 11:19:00) [3]

Большое спасибо


DrPass   (2004-10-16 01:44:00) [4]

Мда... сначала - читать теорию. А то получается живая иллюстрация к задаче "может ли обезьяна, прыгая задницей на клавиатуре, написать Windows" (без обид, ладно?)
Потом уже, когда будешь понимать, что пишешь, у тебя должно получиться что-то вроде
if OpenDialog.Execute then begin
DataModule1.ADODataSet.Edit;
DataModule1.ADODataSetUserLocation.AsString:=OpenDialog.FileName;
DataModule1.ADODataSet.Post;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо