ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
05.04.2009, 19:00
|
|
Постоянный
Регистрация: 04.11.2007
Сообщений: 303
Провел на форуме:
811764
Репутация:
119
|
|
PAXAn, http://www.codenet.ru/progr/delphi/stat/print.php
|
|
|
05.04.2009, 20:16
|
|
Участник форума
Регистрация: 25.10.2008
Сообщений: 215
Провел на форуме:
2483773
Репутация:
78
|
|
У кого нибудь есть рабочий пример как сделать фото с веб камеры и записать в файл?
|
|
|
|
05.04.2009, 20:38
|
|
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
Провел на форуме:
1191083
Репутация:
270
|
|
У кого нибудь есть рабочий пример как сделать фото с веб камеры и записать в файл?
Ищи компоненту на дельфи DSPack. Там куча семплов, в т.ч. и по сабжу.
|
|
|
|
06.04.2009, 11:35
|
|
Познающий
Регистрация: 06.03.2007
Сообщений: 59
Провел на форуме:
371875
Репутация:
137
|
|
есть файлик примерного содержания:
какойто муссссоооорррр!!!
<--!tag-->
какойто муссссоооорррр!!!
</--!tag-->
какойто муссссоооорррр!!!
---------------------------------------
как можно средствами delphi удалить то что находится внутри тега, вместе с самими тегами?
|
|
|
|
06.04.2009, 12:55
|
|
Участник форума
Регистрация: 15.11.2006
Сообщений: 259
Провел на форуме:
2589211
Репутация:
151
|
|
Сообщение от winstrool
есть файлик примерного содержания:
какойто муссссоооорррр!!!
<--!tag-->
какойто муссссоооорррр!!!
</--!tag-->
какойто муссссоооорррр!!!
---------------------------------------
как можно средствами delphi удалить то что находится внутри тега, вместе с самими тегами?
Код:
procedure TForm1.Button1Click(Sender: TObject);
var str:string;
a,b:integer;
begin
str:=memo1.Text;
a:= pos('<--!tag-->',str); //определяем позицию начального тэга
b:= pos('</--!tag-->',str); //конечный тэг
showmessage(inttostr(a));
delete(str,a,b-a+length('</--!tag-->')); //удаляем эту часть
memo1.text := str;
end;
|
|
|
|
06.04.2009, 16:23
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме:
6075534
Репутация:
2731
|
|
Привет. Всем. Какой HEX код клавиши WinKey (флажок)?
|
|
|
|
06.04.2009, 17:18
|
|
Постоянный
Регистрация: 24.03.2009
Сообщений: 670
Провел на форуме:
2868783
Репутация:
414
|
|
Последний раз редактировалось razb; 06.04.2009 в 17:25..
|
|
|
|
06.04.2009, 17:42
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме:
6075534
Репутация:
2731
|
|
Нашёл уже константу VK_LWIN & VK_RWIN.
Код:
if (Key=VK_LWIN) then Key:=0;
не пашет =(
Последний раз редактировалось mailbrush; 06.04.2009 в 17:48..
|
|
|
|
06.04.2009, 17:50
|
|
Постоянный
Регистрация: 24.03.2009
Сообщений: 670
Провел на форуме:
2868783
Репутация:
414
|
|
Спс, а как запретить нажатие WinKey? Ну пуск я запретил, а на клавишу ведь можно же нажать... (Дельфи)
http://www.windowsnetworking.com/kba...nkeyboard.html
To disable WinKey functionality that comes with most modern keyboards save the following text in a REGINI script and run the script from the Windows NT command prompt. Restart the computer to make the changes take effect.
Там по ссылке скрипт лежит для отключения.
|
|
|
|
06.04.2009, 17:55
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме:
6075534
Репутация:
2731
|
|
Сорь, но мне надо на дельфи =). Ну т.е. через дельфи отключить клавишу.
нашёл. http://www.oszone.net/2031/, но там надо ребутится. Без ребута можно?
Последний раз редактировалось mailbrush; 06.04.2009 в 17:58..
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
