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

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

Необходимо конструктивное решение [D5, D6, Win95/98, Win2k]


Weare ©   (2002-10-22 10:43:00) 

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


...
Bmp.LoadFromFile("Platezh.bmp");
Printer.Canvas.Font.Color:=clblack;
Printer.BeginDoc;
Printer.Canvas.StretchDraw(Rect(-60,-105,4847,6882),Bmp);
Printer.Canvas.TextOut(3600,665,Edit1.Text);
Printer.Canvas.TextOut(4272,995,Edit3.Text);
Printer.EndDoc;
...


Как организовать, чтобы этот уже заполненый бланк можно было сохранить под каким-то именем (с тем чтобы потом его можно было открыть, отредактировать и заново распечатать). Т.е. сохранить по сути нужно содержимые Edit"ов, а затем при выборе данного сохраненного файла их снова туда засунуть. И как вы поняли таких сохранненых бланков может быть множество.


Weare   (2002-10-22 17:55:00) [1]

Че-то я совсем запарился, что-то ничего не получается. Все делаю как сказал AndreyAG. Но мне выдает Access violation at address... и т.д. В хелпе ничего путного не нашел. Подскажите плиз, что я здесь упустил, что я не так делаю?


Weare   (2002-10-22 11:15:00) [2]

Мне эта идея понравилась, спасибо AndreyAG. Просто когда я это писал, я еще не видел его ответа


Skier   (2002-10-22 11:09:00) [3]

>Weare
А чем тебя способ AndreyAG не
устраивает (имею ввиду - через TStringList) ?


Weare   (2002-10-22 11:04:00) [4]

> Anatoly Podgoretsky ©
А если через БД, то как: в одной таблице, или в нескольких. Если в одной, то как мне искать именно ту совокупность Edit"ов, а если в нескольких, то тут я вообще ничего не могу придумать.

> Skier ©
Я думал про ini-файлы, но в проге где-то около 40 Edit"ов и все это засовывать в ini-файл, а если сохранений таких очень много...
Меня это почему-то смущает.

Да, кстати, я же не сказал. Дело в том, что мне перед открытием какого-то бланка нужно зать он ли это, т.е. необходимо устроить предварительный просмотр содержимого сохранений. А как?
Вот если бы сохранять в *.bmp файлах(просмотр легко можно организовать), а из них вытягивать в Edit"ы их содержимое, но ведь это невозможно, или я ошибаюсь?


AndreyAG   (2002-10-22 10:53:00) [5]

Используй Strings!

var
MyBlank:TStrings;
begin
//Заполняем строки TStrings
MyBlank.Add(Edit1.Text);
...............
................

//Сохраняем в файле
MyBlank.SaveToFile("Myfyle");
//Загружаем из файла
MyBlank.LoadFromFile("Myfyle");
//Заполняем бланк
Edit1.Text:=MyBlank.Strings[0];
Edit2.Text:=MyBlank.Strings[1];
................
................
end;


Anatoly Podgoretsky   (2002-10-22 10:49:00) [6]

Раз множество, то каждую в отдельный файл, но такие вещи по уму делают через базы данных


Skier   (2002-10-22 10:46:00) [7]

>Weare
TIniFile ?


Наверх

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