| Автор | помогите с delphi |
|---|
как при нажатии открыть фаил и вписать измененный лэйбл в нужную мне строку?
Каждый раз, когда ты будешь вызывать процедуру, в которой находится код ReWrite(F);
Writeln(F, Label1.caption);
Writeln(F, Label2.caption);
.....
Writeln(F, Labeln.caption);
Closefile(F);
Лейблы в файле будут снова и снова изменятся на те, которые, в вобщем которые изменились. |
| а как мне читать из файла нужное мне значение именно в тот же лэйбл? |
а как мне читать из файла нужное мне значение именно в тот же лэйбл?
Так же только наоборот labeln.caption:=read(file, nazvanie faila) |
label5.caption:=read(F, 'text.txt');
выделяет красным(( |
label5.caption:=read(F, 'text.txt');
GetCurrentDir+'text.txt', нэ?
путь до файла полным должен быть... |
label5.caption:=read(F, GetCurrentDir+'text.txt');
так тоже выделяет((
GetCurrentDir это что за команда? |
Что-то я увлекся.
Укажи полное имя к файлу, например, такое:
'c:\text.txt'
А GetCurrentDir - функция, равная адресу к папке, в которой твоя программа. |
| label5.caption:=read(F, 'C:\Users\Äåíèñ\Desktop\delphi\text.txt'); |
label5.caption:=read(F, 'text.txt');
Я - идиот.
Вместо 'text.txt' должна быть переменная типа string, и надо
var str:string;
...
read(F, str);
label5.caption:=str;
вот так. |
тоже выделяет(
почему с GetCurrentDir не работает? |
var str:string;
...
read(F, str);
label5.caption:=str;
ошибка проги( |
| Никогда не понимал особо работу с файлами, чтоб их -_- |
read(F, str)
в этой строке |
var str:string;
...
read(F, str);
label5.caption:=str;
str - надо же вроде что то присвоить?? |
| лог ошибки какой? |
| и пожалуйста полный код в студию |
var
Form1: TForm1;
a:integer;
b:integer;
F:TextFile;
text:string;
str:string;
implementation
{$R *.dfm}
procedure TForm1.Image3Click(Sender: TObject);
begin
read(F, str);
label3.caption:=str;
a:=3;
Label42.Caption := IntToStr(a);
label3.caption := inttostr(strtoint(label3.caption)+1);
label40.caption := inttostr(b);
b:=a;
AssignFile(F, 'text.txt');
ReWrite(F);
Closefile(F);
end; |
| так, теперь покажи как ты читаешь строку из файла |
| ошибка 104 |
| хотя я догадываюсь в чем ошибка ReWrite(F) открывает файл на запись, тебе нужно открыть файл на чтение |
