Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Помогите по двум вопросам! 


Socol   (2001-12-15 10:45) [0]

Здраствуйте уважемые гопода програмисты!
Помогите записать переменые в файл и загрузить их.
Есть 3 лэйбола
И 3 переменых A B C
Задача записать переменные в фай и загрузить их при необходимости.
Надо присвоить надписи лэйболов переменым примерно так
Label1.caption:=A;
Label2.caption:=B;
Label3.caption:=C;
и затем при нажатии на коммандбутон переменые сохранялись в peremen.sav.
И анологично загружались.
+++Как загрузить анемационный рисунок *.gif+++
Благодарю всех кто ответил!



Anatoly Podgoretsky   (2001-12-15 11:43) [1]

Readln(f,a,b,c);
Writeln(f,a,b,c);



Song   (2001-12-15 22:22) [2]

Type Rec=Record
a,b,c:String;
End;
Var ff:File of Rec;
n:Rec;

...

Read(ff,n);

Label1.Caption:=n.a;
Label1.Caption:=n.b;
Label1.Caption:=n.c;

...

Write(ff,n);


Всё просто!!!



Вадим   (2001-12-15 23:05) [3]

2Song

Type Rec=Record
a,b,c:String;
End;
Var ff:File of Rec;
n:Rec;

Это работать не будет, надо использовать ShortString;



Song   (2001-12-16 22:28) [4]

Да, просто забыл, но я делаю так: a,b,c:String[100];
так будет работать



KilkennyCat   (2001-12-17 03:48) [5]

Никак работать не будет :)
вы файл забыли открыть :))



Builder   (2001-12-17 03:53) [6]

А может writeComponent ?:)



Song   (2001-12-19 23:24) [7]

Ну,это же ясно как белый день, что его нужно открыть, сбросить на чтение, а потом и закрыть - просто не стал писать лишнюю инфу, это и так все знают! (посмотрите на суть вопроса)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.027 c
1-22060           Atrem                 2001-12-18 19:18  2002.01.08  
Метод Insert Richedit-а


14-22396          Merlin                2001-11-02 09:54  2002.01.08  
Сегодня радостный день! Кроме того, что пятница...


1-22183           XeN                   2001-12-21 11:21  2002.01.08  
DelphiX_play


3-21983           victor                2001-12-06 13:13  2002.01.08  
серийный номер на делфи 6


1-22037           Aleksandr             2001-12-18 13:03  2002.01.08  
Не рисуется компонента, и все тут...