Форум: "Основная";
Поиск по всему сайту: 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];
EMAIL={{}};LOGIN={{Socol}};TITLE={{Помогите по двум вопросам!}};ATTRIBUTES={{}};ID_MSG={{604}};ID_GROUP={{1}};ID_NNTP={{604}};ID_DM={{22119}};REPLYNR={{0}};ID_DM_AUTHOR={{0}};ARCHIVE={{2002.01.08}};REPLYDATE={{2001-12-15 10:45}};CNT={{7}};
Память: 0.75 MB
Время: 0.028 c