ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
16.12.2007, 14:08
|
|
Постоянный
Регистрация: 08.05.2006
Сообщений: 816
Провел на форуме:
1845671
Репутация:
1338
|
|
Сообщение от infernal-team
Что не кто не может сказать мне код?
Что там за код тебе нужно сказать ??? 
|
|
|
17.12.2007, 12:32
|
|
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032
Репутация:
8
|
|
Мне нужно код добавить что бы при запуске exe блокировался сайт при открытии его в браузере.
|
|
|
|
17.12.2007, 14:58
|
|
Флудер
Регистрация: 18.01.2005
Сообщений: 2,298
Провел на форуме:
13936387
Репутация:
1844
|
|
Сообщение от infernal-team
Мне нужно код добавить что бы при запуске exe блокировался сайт при открытии его в браузере.
пропиши в C:\WINDOWS\System32\drivers\etc\hosts этот сайт:
www.blablabla.ru 127.0.0.1
|
|
|
|
17.12.2007, 15:52
|
|
Участник форума
Регистрация: 06.02.2006
Сообщений: 137
Провел на форуме:
656903
Репутация:
15
|
|
если ShowMessage(DBGrid1.Fields[5].AsString);
то выдаёт сообщение 6570,989115 , аможно как чтобы после "," числа не писались?
и вот ещё чего пишит ошибку? SzTip:='Соедидение установленно!'+ DBGrid1.Fields[5].AsString;
Последний раз редактировалось XIII; 17.12.2007 в 16:14..
|
|
|
|
17.12.2007, 15:56
|
|
Флудер
Регистрация: 18.01.2005
Сообщений: 2,298
Провел на форуме:
13936387
Репутация:
1844
|
|
Сообщение от XIII
если ShowMessage(DBGrid1.Fields[5].AsString);
то выдаёт сообщение 6570,989115 , аможно как чтобы после "," числа не писались?
Можно =))
P.S. Какой вопрос - такой ответ. .
|
|
|
|
17.12.2007, 19:54
|
|
Постоянный
Регистрация: 05.01.2007
Сообщений: 508
Провел на форуме:
2360904
Репутация:
1393
|
|
Сообщение от dinar_007
Можно =))
P.S. Какой вопрос - такой ответ. .
trunc()
|
|
|
|
17.12.2007, 16:54
|
|
Постоянный
Регистрация: 04.11.2007
Сообщений: 331
Провел на форуме:
1724067
Репутация:
806
|
|
Сообщение от XIII
если ShowMessage(DBGrid1.Fields[5].AsString);
то выдаёт сообщение 6570,989115 , аможно как чтобы после "," числа не писались?
и вот ещё чего пишит ошибку? SzTip:='Соедидение установленно!'+ DBGrid1.Fields[5].AsString;
Используй:
Copy(S: string; Index, Count: Integer): string Возвращает подстроку строки S, начинающуюся с S[Index] и содержащую до Count символов.
Pos(Substr: string; S: string): Integer Возвращает позицию (индекс) первого вхождения Substr в S. Если Substr нет в S, возвращается 0.
Например так:
SzTip:='Соедидение установленно!'+ copy(DBGrid1.Fields[5].AsString,0,pos(',',DBGrid1.Fields[5].AsString);
|
|
|
|
17.12.2007, 16:15
|
|
Участник форума
Регистрация: 06.02.2006
Сообщений: 137
Провел на форуме:
656903
Репутация:
15
|
|
ну а как?
|
|
|
|
17.12.2007, 16:24
|
|
Флудер
Регистрация: 18.01.2005
Сообщений: 2,298
Провел на форуме:
13936387
Репутация:
1844
|
|
Сообщение от xiii
если ShowMessage(DBGrid1.Fields[5].AsString);
то выдаёт сообщение 6570,989115 , аможно как чтобы после "," числа не писались?
и вот ещё чего пишит ошибку? SzTip:='Соедидение установленно!'+ DBGrid1.Fields[5].AsString;
Если первое можно домыслить второе я вообще хз что ты спрашиваешь...
Кто тебе ошибку выдаёт?
Понятнее выражайся...
Последний раз редактировалось dinar_007; 17.12.2007 в 16:28..
|
|
|
|
17.12.2007, 16:22
|
|
Постоянный
Регистрация: 09.11.2006
Сообщений: 639
Провел на форуме:
1917742
Репутация:
541
|
|
перед выводом строку просто нужно пропарсить, StringReplace юзай и замени "," на пробел.
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид