Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Основной форум

Основной форум Сюда все проблемы связанные с программированием.

Ответ
 
Опции темы
Старый 08.09.2007, 10:37   #1
Черный Лорд
Оператор ЭВМ
 
Регистрация: 26.07.2007
Сообщений: 29
Написано 0 полезных сообщений
(для 0 пользователей)
Восклицание сохранение и загрузка!

Я делаю форму с текстовым окном. Мне надо, чтобы при загрузки в этом текстовом поле появлялась надпись. Я ее изменяю и нажимаю клавишу сохранить и сохраняется новый текст. Потом я захожу в программы и вижу в текстовом поле текст который сохранял.

За ранее благодарю!
(Offline)
 
Ответить с цитированием
Старый 08.09.2007, 12:46   #2
ViNT
Модератор
 
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений
(для 817 пользователей)
Re: сохранение и загрузка!

Примерно так:
program RS_x;
var
etext:integer;
rs:recordstore;
buf:string;
cmok:command;
idx:integer;
cmexit,clicked:command;
begin
rs:=openrecordstore('TEXT');
showform;
etext:=formaddtextfield('Текст','',20,tf_any);
cmok:=createcommand('OK',cm_ok,0);
cmexit:=createcommand('EXIT',CM_EXIT,0);
addcommand(cmok);
addcommand(cmexit);
buf:=readrecordstoreentry(rs,1);
formsettext(etext,buf);
repeat
clicked:=getclickedcommand;
if clicked=cmok then
begin
if readrecordstoreentry(rs,1)='' then
idx:=addrecordstoreentry(rs,formgettext(etext)) else
modifyrecordstoreentry(rs,formgettext(etext),1);
end;
until clicked=cmexit;
closerecordstore(rs);
end.
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Lib_bmp:сохранение изображений в ФС. ViNT Библиотеки 2 13.05.2009 19:00
сохранение резуьтата Mark Castle Основной форум 3 28.11.2008 18:11
Сохранение с канвы beZ_probleM Основной форум 2 10.11.2008 01:47
Lib_png: сохранение изображений в формате PNG ViNT Библиотеки 9 04.10.2008 17:25
Сохранение 2D картинки Fant 2D-программирование 10 10.02.2008 15:59


Часовой пояс GMT +4, время: 18:59.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com