Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для компьютеров > Delphi

Ответ
 
Опции темы
Старый 07.11.2012, 13:29   #1
Dark Dragon
Оператор ЭВМ
 
Аватар для Dark Dragon
 
Регистрация: 13.10.2012
Адрес: Российская Федерация,г.Челябинск.
Сообщений: 41
Написано 0 полезных сообщений
(для 0 пользователей)
Лампочка Неправильно работает кнопка!

procedure TForm1.Button1Click(Sender: TObject);
begin
assignfile(f,'qwerty);
rewrite(f);
write(f,'Ваш текст');
closefile(f);
button1.free;
end;


Данная процедура вызывается нажатием кнопки.Все работает,только после нажатия на половине выполнении выскакивает ошибка ASSOCIATIVE ERROR.Как убрать ее?
__________________
P.S.: Если что я этого не говорил
(Offline)
 
Ответить с цитированием
Старый 07.11.2012, 15:17   #2
ViNT
Модератор
 
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений
(для 817 пользователей)
Ответ: Неправильно работает кнопка!

Во-первых, непонятно, зачем button1.free, и как вообще после этого кнопку можно повторно нажать, она же удаляется.
Во-вторых, ошибка может быть связана с попыткой повторного открытия уже открытого файла.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
SBJoker (07.11.2012)
Старый 08.11.2012, 07:55   #3
Dark Dragon
Оператор ЭВМ
 
Аватар для Dark Dragon
 
Регистрация: 13.10.2012
Адрес: Российская Федерация,г.Челябинск.
Сообщений: 41
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Неправильно работает кнопка!

Мне не нужно повторно нажимать кнопку.Мне наоборот нужно ее убрать дабы уберечь от повторного нажатия.Без] button1.free программа работает нормально файл создает и инфа в нем сохраняется.С buttion1.free ошибка вылезает после нажатия кнопки даже если приложение запущенно впервые и текстового файла еще нет.
__________________
P.S.: Если что я этого не говорил
(Offline)
 
Ответить с цитированием
Старый 08.11.2012, 10:59   #4
ViNT
Модератор
 
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений
(для 817 пользователей)
Ответ: Неправильно работает кнопка!

У меня данный код никаких ошибок не вызывает, ошибка вероятно связана либо с системой, либо с доступом к файлам.
Но в любом случае, использовать здесь метод Free это изврат. Абсолютно достаточно и куда более корректно использовать свойство Enable.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Dark Dragon (06.08.2013)
Старый 31.07.2013, 12:11   #5
AntonioPermskiy
AnyKey`щик
 
Регистрация: 31.07.2013
Сообщений: 1
Написано одно полезное сообщение
(для 2 участников)
Ответ: Неправильно работает кнопка!

Сообщение от Dark Dragon
нужно ее убрать
Сообщение от ViNT Посмотреть сообщение
свойство Enable.
свойство Visible
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо AntonioPermskiy за это полезное сообщение:
Dark Dragon (06.08.2013), impersonalis (01.08.2013)
Старый 01.08.2013, 00:57   #6
impersonalis
Зануда с интернетом
 
Аватар для impersonalis
 
Регистрация: 04.09.2005
Сообщений: 14,014
Написано 6,798 полезных сообщений
(для 20,935 пользователей)
Ответ: Неправильно работает кнопка!

Поражает столь сильное желание помочь : даже зарегистрировался
__________________
http://nabatchikov.com
Мир нужно делать лучше и чище. Иначе, зачем мы живем? tormoz
А я растила сына на преданьях
о принцах, троллях, потайных свиданьях,
погонях, похищениях невест.
Да кто же знал, что сказка душу съест?
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Arton (01.08.2013)
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 12:32.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com