ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

16.03.2010, 20:30
|
|
Постоянный
Регистрация: 26.01.2008
Сообщений: 796
Провел на форуме: 5209663
Репутация:
357
|
|
Как TStringList перевести в String с разделителем #13#10?
|
|
|

16.03.2010, 21:27
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме: 828081
Репутация:
84
|
|
если имеем такие строки:
StringList.Add('1');
StringList.Add('12');
StringList.Add('123');
то свойство StringList.Text будет равно '1#13#1012#13#10123#13#10'
а свойство StringList.CommaText '1,12,123'
|
|
|

16.03.2010, 23:16
|
|
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
Провел на форуме: 870084
Репутация:
79
|
|
Подкиньте парочку ссылкой, про стэк и кучу, пожалуйста.
|
|
|

17.03.2010, 07:34
|
|
Участник форума
Регистрация: 14.03.2009
Сообщений: 237
Провел на форуме: 813785
Репутация:
314
|
|
Сообщение от fenixelite
Подкиньте парочку ссылкой, про стэк и кучу, пожалуйста.
http://www.delphisources.ru/pages/faq/base/manage_segment_data_size.html
http://forum.sources.ru/index.php?showtopic=280746
http://www.xakep.ru/magazine/xa/114/050/1.asp
http://articles.org.ru/cn/showdetail.php?cid=7342
http://delphi.about.com/od/objectpascalide/l/aa103003a.htm
http://www.experts-exchange.com/Programming/Languages/Pascal/Delphi/Q_10354858.html
|
|
|

17.03.2010, 13:17
|
|
Участник форума
Регистрация: 06.02.2006
Сообщений: 137
Провел на форуме: 656903
Репутация:
15
|
|
хочу добавить в базу данные
SQLConnection1.Connected:=true;
SimpleDataSet1.DataSet.CommandText:='INSERT INTO users ("id","name","fname","email","pass") values ("","'+Edit1.Text+'","'+Edit2.Text+'","'+Edit3.Tex t+'","'+Edit4.Text+'")';
SimpleDataSet1.DataSet.Active:=true;
SimpleDataSet1.Active:=true;
что не правельно?
Последний раз редактировалось XIII; 17.03.2010 в 16:08..
|
|
|

17.03.2010, 20:31
|
|
Участник форума
Регистрация: 05.12.2007
Сообщений: 113
Провел на форуме: 252598
Репутация:
34
|
|
Уважаемые мемберы может ктонибудь показать на примере как скачать и выполнить файл использую для скачивания только winsocks ??
у меня что то не выходит =((
Код:
WSAStartup(makeword(1,1),info);
sHwnd:=Socket(AF_INET, SOCK_STREAM, 0);
sin.sin_family:=AF_INET;
sin.sin_port:=htons(dport);
sin.sin_addr.S_addr:=inet_addr(dhost);
connect(sHwnd, sin, sizeof(sin));
sbuff1 := '';
sbuff1 := 'GET ' + dpath + '? HTTP/1.1'+ #13#10 +
'Host: ' + dhost + #13#10#13#10;
CopyMemory(@sBuff,pchar(sBuff1),length(sBuff1));
send(sHwnd, sBuff, Length(sBuff), 0);
recv(sHwnd, rBuff, Length(rBuff), 0);
fileText := copy(rBuff, pos(#13#10#13#10, rBuff)+4, length(rBuff)-pos(#13#10#13#10, rBuff));
SaveFile(SavePath, fileText);
|
|
|

17.03.2010, 21:02
|
|
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
Провел на форуме: 4761503
Репутация:
229
|
|
zer0ska, вот слушай, когда сервер тебе отвечает он тебе посылает свои хеддеры в которых указан размер данных (в символах)(Content-Length), вот его считываешь и потом постепенно принимаешь символы от сервера (т.е. ответ от сервера)(while цикл тебе поможет)
Это все не сложно делается!
|
|
|

17.03.2010, 21:19
|
|
Участник форума
Регистрация: 05.12.2007
Сообщений: 113
Провел на форуме: 252598
Репутация:
34
|
|
Сообщение от wolmer
zer0ska, вот слушай, когда сервер тебе отвечает он тебе посылает свои хеддеры в которых указан размер данных (в символах)(Content-Length), вот его считываешь и потом постепенно принимаешь символы от сервера (т.е. ответ от сервера)(while цикл тебе поможет)
Это все не сложно делается!
это я понел но реализовать чстно говоря не знаю как =)
с while for знаком но не выходит что то =((
|
|
|

17.03.2010, 21:27
|
|
Познавший АНТИЧАТ
Регистрация: 05.05.2008
Сообщений: 1,078
Провел на форуме: 10311449
Репутация:
1357
|
|
Помогите написать программу подсчета количества элементов, попадающих между номером минимального элемента и максимального элемента в массиве из 30 чисел.
|
|
|

17.03.2010, 21:44
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме: 612028
Репутация:
28
|
|
Сообщение от MaTpOc
Помогите написать программу подсчета количества элементов, попадающих между номером минимального элемента и максимального элемента в массиве из 30 чисел.
отнимай одно от другого по модулю..
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|