Вниз
Скачать: CL | DM;

Пересохранение файла???   Найти похожие ветки 

← →
Hitkliff ©   (2006-04-26 09:00) [0]

Допустим что у меня обучающая программа! В файлах этой проги лежит базаданных(кпримеру 1.mdb)! как мен мона сделать чтобы при нажатии какойнибудь кнопки на форме(либо в компоненте MainMenu) появлялось окно с просьбой сохранить Эту бД к себе на диск????


← →
Рамиль ©   (2006-04-26 09:16) [1]

procedure TForm1.Button1Click(Sender: TObject);
begin
 ShowMessage("Пожалуйста, сохраните базу себе на диск!");
end;


← →
Hitkliff ©   (2006-04-26 09:50) [2]

Не всмысле сообщение! А диалоговое окно сохранения файла с выбором пути ?


← →
balepa ©   (2006-04-26 10:11) [3]

Dialogs -> SaveDialog


← →
Hitkliff ©   (2006-04-26 10:39) [4]


> Dialogs -> SaveDialog

а как сделать так чтобы именно определенный файл сохранялся?
напишите код плз


← →
balepa ©   (2006-04-26 10:43) [5]

Хитрый да ?
Что именно не получается ?
А что тебе мешает сделать самому, форму с кнопочкой и выбором каталога если у тебя файл имеет одно и тоже название ?


← →
Hitkliff ©   (2006-04-26 11:05) [6]


> Хитрый да ?
> Что именно не получается ?
> А что тебе мешает сделать самому, форму с кнопочкой и выбором
> каталога если у тебя файл имеет одно и тоже название ?

А если у меня куча таких файлов на разных формах? и что мне придется для каждого файла делать свою форму??
Мне бы узнать как написать диалоговое окно сохранения файла с выбором пути через SaveDialog?


← →
zorik ©   (2006-04-26 11:09) [7]

function SelectDirectory(const Caption: string; const Root: WideString; out Directory: string): Boolean; overload;
function SelectDirectory(var Directory: string; Options: TSelectDirOpts; HelpCtx: Longint): Boolean; overload;


← →
balepa ©   (2006-04-26 11:10) [8]


> Hitkliff ©   (26.04.06 11:05) [6]


В вопросе говорилось об одном файле.


← →
Ksenom ©   (2006-04-26 11:14) [9]

if Form1.SaveDialog1.Execute
then begin
 {по желанию тут можно отрезать расширения, менять имя и т.д. Путь будет храниться в Form1.SaveDialog1.FileName}
 if Pos(".txt",Form1.SaveDialog1.FileName)=0 then   Form1.SaveDialog1.FileName:=Form1.SaveDialog1.FileName+".txt";
{своя процедура сохранения, как душе угодно}  
end;


← →
Hitkliff ©   (2006-04-26 11:48) [10]


> Ksenom ©

спс попробую.
Люди плз пишите свои предложения!


← →
balepa ©   (2006-04-26 11:58) [11]


> Hitkliff ©   (26.04.06 11:48) [10]


Предлагаю "вооружиться" книжкой и начать изучать самостоятельно и только в затруднительных ситуациях (после трех дней "мучений") обращаться с вопросами на форум.


← →
Gydvin ©   (2006-04-26 13:33) [12]


> А если у меня куча таких файлов на разных формах?

Это как :() ?


← →
Hitkliff ©   (2006-04-26 14:19) [13]


> Это как :() ?

Это так:
У меня программа учебник!
В ней есть лабораторные работы!
А к каздой лабе несколько файлов! Вот как!


← →
Gydvin ©   (2006-04-26 14:30) [14]

Ну тады бы так и говорил, А к каздой лабе пути к нескольким файлам!


← →
balepa ©   (2006-04-26 15:10) [15]


> Hitkliff ©   (26.04.06 14:19) [13]


А одна база с несколькими таблицами не подходит ?


← →
Hitkliff ©   (2006-04-26 15:46) [16]


> А одна база с несколькими таблицами не подходит ?

нет!
Там в разных лабах разные задания...


← →
Ksenom ©   (2006-04-27 15:41) [17]

Hitkliff, кстати вариант с базкой очень правелен, просто грамотно таблици зделай (универсальные) и храни данные так. Плюсов дофига и минусов я не вижу. Подумай как, потом за уши не оттащиш...


← →
Hitkliff ©   (2006-04-27 17:03) [18]


> Hitkliff, кстати вариант с базкой очень правелен, просто
> грамотно таблици зделай (универсальные) и храни данные так.
>  Плюсов дофига и минусов я не вижу. Подумай как, потом за
> уши не оттащиш...

Конечно это может быть и очень хорошо может получиться! спасибо за совет! но мне весь материал дали и мне просто нужно сделать оболочку. А переделывать кучу БД мне не очень хочется



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.49 MB
Время: 0.025 c
15-1145307696
Дмитрий Белькевич
2006-04-18 01:01
2006.05.14
Купить Delphi7


2-1145794547
Melifaro
2006-04-23 16:15
2006.05.14
Заполнение динамического(открытого) массива (help plz)


2-1142188972
Denver's
2006-03-12 21:42
2006.05.14
Cookies


3-1142684878
xayam
2006-03-18 15:27
2006.05.14
Проблема с SQL


15-1145431382
ilya39
2006-04-19 11:23
2006.05.14
ICQ 2003a vs Miranda 0.4.0.3




   Наверх