Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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]

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



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

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

Наверх




Память: 0.45 MB
Время: 0.007 c
14-22390
Ежик
2001-11-08 12:54
2002.01.08
Слушай Мерлин, ты когда нибудь спишь? В смысле, отдыхаешь?


4-22475
Di_wind
2001-11-02 16:08
2002.01.08
Поиск


4-22487
Rad
2001-11-05 00:40
2002.01.08
Создание макроса в Excel


4-22477
Art
2001-10-31 12:17
2002.01.08
Как увидеть все процессы запущенные всеми прогами?


1-22101
DenKop
2001-12-18 14:38
2002.01.08
Создание Help ов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский