Вопрос № 65523: Здравствуйте. Прошу прощения за наивный вопрос, но как поместить процедуры в разные файлы? У меня на форме куча вкладок с кнопками и прочими элементами, и файл программы разросся до огромных размеров. Я знаю, что можно использовать {$INCLUDE filename...Вопрос № 65527: Здравствуйте!
Не подскажите как провернуть следующее:
нужно залить файл в папку на фтп серваке.
как можно это сделать?
Спасибо за ответы!...Вопрос № 65553: Здравствуйте эксперты. Помогите пожалуйста. Требуется быстрая очистка таблицы от записей (TADOTable). По нажатию на button пишу:
adotable1.DeleteRecords; или
adotable1.DeleteRecords(arall); выдает исключение: 'Operation is not allowed in th...
Вопрос № 65.523
Здравствуйте. Прошу прощения за наивный вопрос, но как поместить процедуры в разные файлы? У меня на форме куча вкладок с кнопками и прочими элементами, и файл программы разросся до огромных размеров. Я знаю, что можно использовать {$INCLUDE filename}, но можно ли это сделать как-нибудь по-другому?
С уважением,
Михаил.
Отправлен: 04.12.2006, 17:33
Вопрос задал: Михаил73 (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Алтунин Василий Владимирович
Здравствуйте, Михаил73!
Все очень просто. Разнесите процедуры по разным модулям. Модули нужно назвать соответственно группе процедур и функций. Затем используйте Uses для подключения этих модулей. И не забудьте прописать имена этих функций в разделе Interfaces
Здравствуйте!
Не подскажите как провернуть следующее:
нужно залить файл в папку на фтп серваке.
как можно это сделать?
Спасибо за ответы!
Отправлен: 04.12.2006, 18:43
Вопрос задал: SA2006 (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: PaVeL_Ekt
Здравствуйте, SA2006!
Если есть NMFTP то используйте его.
Настройте все необходимые параметры:
HOST
PORT
UserID
Password
а затем
NMFTP1.UploadAppend(LocalFile, RemoteFile: string); // если файл на фтп существует то дописывает файл источник в конец файла назначения.
NMFTP1.UploadUnique(LocalFile); // закачивает файл, если файл с таким именем уже существует на фтп, то закачиваемому файлу необходимо дать новое имя.
NMFTP1.UploadRestore(LocalFile,RemoteFile,Position); // закачивает файл с определенной позиции курсора.
--------- Да поможет Вам F1, да сохранит Вас F2, во имя CTRL, ALT и святого DEL
Ответ отправил: PaVeL_Ekt (статус: 7-ой класс)
Ответ отправлен: 05.12.2006, 07:20
Вопрос № 65.553
Здравствуйте эксперты. Помогите пожалуйста. Требуется быстрая очистка таблицы от записей (TADOTable). По нажатию на button пишу:
adotable1.DeleteRecords; или
adotable1.DeleteRecords(arall); выдает исключение: 'Operation is not allowed in this context'. В справке дельфи указано:
For TADOTable, you can use the DeleteRecords method.
PhoneTable.DeleteRecords;
не могу понять, что я упускаю? Метод типа while not table.Eof do table.delete не предлагайте, долго работает.
Отвечает: din
Здравствуйте, Жданов Евгений Александрович!
Скорее всего ADO подразумевает, что данный метод удаляет записи уже помеченные на удаление, по правде никогда не пользовался этим методом, да и вообще мало использовал сам компонент. Проще и быстрее выполнить запрос:
AdoQuery1.SQL.Text := 'Delete from MyTableName';
AdoQuery1.ExecSQL;
Удачи!
--------- Есть только одно зло - невежество, и только одно благо - знания
Ответ отправил: din (статус: Практикант)
Ответ отправлен: 04.12.2006, 23:56
Отвечает: PaVeL_Ekt
Здравствуйте, Жданов Евгений Александрович!
к ответу Sir Henry добавлю, что можно попробовать вызвать метод supports( TCursorOptions) и в нем прописать все необходимые параметры для работы с базой.
в нелпе описание по этому пункту имеется.
или
If the dataset was opened in batch update mode, the records are only marked for deletion, что означает если dataset открыт в режиме редактирования, записи только пометятся на удаления, для удаления необходимо принять изменения.
--------- Да поможет Вам F1, да сохранит Вас F2, во имя CTRL, ALT и святого DEL
Ответ отправил: PaVeL_Ekt (статус: 7-ой класс)
Ответ отправлен: 05.12.2006, 07:05
