Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

Допоможіть з двох питань! Знайти схожі гілки


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

Здраствуйте уважемие Гоподь Програмісти!
Допоможіть записати змінні в файл і завантажити їх.
Є 3 лейбола
І 3 мінливих ABC
Завдання записати змінні в фай і завантажити їх при необхідності.
Треба присвоїти написи лейболов Мінлива приблизно так
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;
Кінець;
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;
Кінець;
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.83 MB
Час: 0.023 c
3-21996
vinni2000
2001-12-06 11:47
2002.01.08
Як за допомогою запиту вибрати дані з Query


3-21937
ANDREY196
2001-12-04 18:24
2002.01.08
Як мені поміняти колір в певній рядку таблиці в DBGRID


14-22411
MadBurro
2001-11-12 20:52
2002.01.08
WinXP cd-key


1-22058
$ Hic0
2001-12-16 11:49
2002.01.08
TTreeView and TListView


1-22151
Koks
2001-12-20 14:06
2002.01.08
MDI -ClientForm





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська