TC
На соусфорже какой-то совсем протухший компонент 2009 года. Надеюсь, в репе пакетов оно поновее. Но там же я нашел еще и LazRichView. Попробую их оба погонять
Size: a a a
2020 October 17
SB
На соусфорже какой-то совсем протухший компонент 2009 года. Надеюсь, в репе пакетов оно поновее. Но там же я нашел еще и LazRichView. Попробую их оба погонять
LazRichView лучше взять свежий из гитхаба, там много исправлений, связанных с размером символов в utf-8, добавлением новых абзецев
ED
На соусфорже какой-то совсем протухший компонент 2009 года. Надеюсь, в репе пакетов оно поновее. Но там же я нашел еще и LazRichView. Попробую их оба погонять
В Online Package Manager'е есть ссылки на репы со свежими танками, не говоря о том, что из него же ричэдит и ставится одним кликом. Насколько мне помнится, последние правки Скалогрыз делал год-два назад. К тому же, он часто бывает на Лазаревских форумах (и русском, и буржуйском). Там же всегда охотно отвечает на все вопросы.
ea
Подскажите онлайн курсы для школьников, где кодингу с нуля можно научиться. Хочу мелкого своего сдать.
ED
На соусфорже какой-то совсем протухший компонент 2009 года. Надеюсь, в репе пакетов оно поновее. Но там же я нашел еще и LazRichView. Попробую их оба погонять
Если посмотреть даты изменений, компонент совсем не выглядит заброшенным
С
Народ привет: может подскажете как прописать event для динамически созданного объекта
IdFTP := TIdFTP.Create(nil);
IdFTP.OnWork:= ?????????
procedure IdFTPWork(ASender: TObject; AWorkMode: TWorkMode; AWorkCount: Int64);
begin
if ProgressBar1.MaxValue > 0 then
begin
ProgressBar1.Progress := AWorkCount;
end;
// Update;
end;
IdFTP := TIdFTP.Create(nil);
IdFTP.OnWork:= ?????????
procedure IdFTPWork(ASender: TObject; AWorkMode: TWorkMode; AWorkCount: Int64);
begin
if ProgressBar1.MaxValue > 0 then
begin
ProgressBar1.Progress := AWorkCount;
end;
// Update;
end;
KB
кинь на форму компоненту и двойной клик на событии, чтобы создать заготовку, скопируй код, а потом убери заготовку, потом вставь из буфера обмена скопированную заготовку, ну и код там напиши
KB
ну и потом присваивай
IdFTP.OnWork:= Ftp1OnWork;
Ftp1OnWork можно переименовать, например, на FtpOnWork(....)
IdFTP.OnWork:= Ftp1OnWork;
Ftp1OnWork можно переименовать, например, на FtpOnWork(....)
С
это консоль
С
формы нет
DB
Дата модуль в помощь
DB
Может быть и вручную вообще создавать не нужно станет )
С
а, точно...спс...
а вообще-то возможно ли динамически присвоить event?
а вообще-то возможно ли динамически присвоить event?
DB
Конечно
С
???? как
А
Сергей
это консоль
Progressbar там тогда зачем. Пример?
DB
Сергей
???? как
Присвоением. Создаешь фейковый класс, они будет обрабатывать событие, в нём описанное
С
консоль стартует и проверяет наличие файла и только если нужно копировать в динамике создаётся форма, Прогрессбар и IdFtp
С
а можно кусочек кода?
DB
Сергей
консоль стартует и проверяет наличие файла и только если нужно копировать в динамике создаётся форма, Прогрессбар и IdFtp
Можно сделать проще, сделать обычное гуевое приложение и в dpr обрабатывать ftp коннект