| Firs | Дата: Вторник, 02.08.2011, 02:38 | Сообщение # 1 |
|
Рядовой
Группа: Пользователи
Сообщений: 10
Статус: Offline
| вот код:
procedure TForm3.CheckBox1Click(Sender: TObject);
var
f: textfile;
begin
assignfile(f,'\автозагрузка.txt');
rewrite(f);
if CheckBox1.state=cbChecked then
begin
write(f,'2');
label1.Caption:='в файле число 2';
end;
if CheckBox1.state=cbUnchecked then
begin
write(f,'1');
label1.Caption:='в файле число 1';
end;
closefile(f);
end;
end.
в лейбеле слова меняются, а в файле цыфры не меняются
Сообщение отредактировал Firs - Вторник, 02.08.2011, 02:39 |
| |
| |
| AiX2011 | Дата: Вторник, 02.08.2011, 21:16 | Сообщение # 2 |
|
Лейтенант
Группа: Пользователи
Сообщений: 51
Статус: Offline
| Прочитай внимательно вот эту статью на моем сайте ну а еже ли не поймешь то скажи, я тебе кокретней поясню товю ошибку.... Если ты сам найдешь свою ошибку то ты ее поймешь и не будешь больше допускать, а если тебе пришлют готовый код, и ты его просто вставишь, ты ничего не поймешь... Ну если что пиши, всегда поможем
 Сайт посвященный программированию в среде Delphi. Вопросы по Delphi и HTML на форуме
|
| |
| |
| Firs | Дата: Вторник, 02.08.2011, 21:40 | Сообщение # 3 |
|
Рядовой
Группа: Пользователи
Сообщений: 10
Статус: Offline
| большое человеческое спасибо  получилось
|
| |
| |
| AiX2011 | Дата: Вторник, 02.08.2011, 22:01 | Сообщение # 4 |
|
Лейтенант
Группа: Пользователи
Сообщений: 51
Статус: Offline
| Всегда пожалуйсто.. Был рад помочь)))) Обращайся еще))
Сайт посвященный программированию в среде Delphi. Вопросы по Delphi и HTML на форуме
|
| |
| |
