ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
19.08.2009, 13:22
|
|
Познающий
Регистрация: 19.08.2008
Сообщений: 69
Провел на форуме:
458484
Репутация:
31
|
|
Сообщение от НTL
Такой вопрос:
Есть 2 события:
Например:
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
как при нажатии на вторую кнопку выполнить все действия из обработчика первой кнопки?
Про Ctrl+C , я знаю, но здесь это не очень актуально
В обработчик второй:
Button1.Click;
|
|
|
19.08.2009, 13:39
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
2 НTL ты вообще в событиях можеш им назначить одну и туже процедуру обработки. или в процедуре обработки Button2Click прям напрямую вызвать
Button1Click(button2)
|
|
|
|
19.08.2009, 13:45
|
|
Постоянный
Регистрация: 11.03.2007
Сообщений: 581
Провел на форуме:
4172659
Репутация:
646
|
|
одно событие создай ButtonClick и его укажи в инспекторе для обеих кнопок
|
|
|
|
19.08.2009, 17:27
|
|
Познающий
Регистрация: 19.08.2008
Сообщений: 69
Провел на форуме:
458484
Репутация:
31
|
|
ну че никто не поможет?=(
|
|
|
|
19.08.2009, 19:50
|
|
Участник форума
Регистрация: 20.12.2007
Сообщений: 295
Провел на форуме:
1777055
Репутация:
347
|
|
Сообщение от Uname-A
приветствую всех!
Есть компонент TLabel в нём большое кол-во текста
Нужно сделать перенос текста не по словам как при WordWrap а по буквам
Может быть есть аналог Tlabel где перенос идёт по буквам?
Была идея после 99 (длинна одной строки) символа добавлять #13 Тоесть перенос Но это для меня не совсем подходит так как позже мне этот текст нужно будет удалять по 4 символа с начала...
Очень надеюсь на вашу помощь
просто держи в памяти копию текста и удаляй в ней. А когда надо копируй его в label
|
|
|
|
19.08.2009, 20:05
|
|
Познающий
Регистрация: 19.08.2008
Сообщений: 69
Провел на форуме:
458484
Репутация:
31
|
|
Сообщение от bons
просто держи в памяти копию текста и удаляй в ней. А когда надо копируй его в label
Ех если бы было так просто....
Вообщем ладно Похоже альтернатив нет Буду развивать идею с добавлением #13 символа...
Может ченить выйдет=)
|
|
|
|
19.08.2009, 20:25
|
|
Участник форума
Регистрация: 20.12.2007
Сообщений: 295
Провел на форуме:
1777055
Репутация:
347
|
|
можно конечно еще напрямую выводить API функциями типа TextOut, но мне кажется первый вариант лучше
|
|
|
|
19.08.2009, 21:10
|
|
Познающий
Регистрация: 19.08.2008
Сообщений: 69
Провел на форуме:
458484
Репутация:
31
|
|
Мне нужна наглядность Сам текст вообще не ващен
Программа моя вроде украшения интерфейса.....(не украшение как таковое но близко по смыслу)
И нужно показать как появляется текст(одинаковый)(каждую секунду добавляется одно слово) и из за переноса по слову образуются тупо 4 колонки из этого текста
|
|
|
|
20.08.2009, 00:26
|
|
Новичок
Регистрация: 25.07.2009
Сообщений: 17
Провел на форуме:
86414
Репутация:
3
|
|
скажите кто знает как можно снять с программы crc проверку. нужно сначала снять проверку а потом отредактировать программу.
|
|
|
|
20.08.2009, 00:44
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме:
5749763
Репутация:
1680
|
|
У меня к вам следующий вопрос.
Пишу программу на API которая должна извлекать из .RES файла файл, и + прописывать его в автозагрузку.
Пока использую всем известную функцию:
Код:
procedure ExtractRes(ResType, ResName, ResNewName : String);
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SavetoFile(ResNewName);
Res.Free;
end;
Проблемма в том, что извлекает он файл через TResourceStream, который требует подключённого модуля classes и из за этого вес программы доходит чуть не до 100 килобайт.
Подскажите плз как сделать рабочий код без использования classess чтобы программа мало весила. |
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Линейный вид
