Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
23.04.2010, 22:57
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028
Репутация:
28
|
|
Сообщение от JnK
1. Лучше массив или StringList, по простой причине не будет отображаться значит скорость больше, но если все же надо отображать, то есть команды вроде как увеличивывают скорость.
угу, подгружаешь файлик в гиг, он себе комфортно размещается в оперативке попутно убив комп.. 
|
|
|
24.04.2010, 00:44
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563
Репутация:
52
|
|
Сообщение от [stranger]
угу, подгружаешь файлик в гиг, он себе комфортно размещается в оперативке попутно убив комп.. Ну 1 лям записей это явно не 1 гиг , Но если уж на то пошло, то как ни крути, если тебе хочется загрузить в программу, будь то мемо, массив или хз что, в оперативе файл будет висеть условно. Хотя винда распределит ресурсы  надеюсь.
А насчет убивать комп, зависит от кривизны рук кодера. Можно и одной строкой загнуть комп до состояния - не стояния..
P.s. Кто мешает тебе программно порезать файлить и подгружать частями?
Последний раз редактировалось JnK; 24.04.2010 в 00:47..
|
|
|
|
24.04.2010, 01:06
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028
Репутация:
28
|
|
Сообщение от JnK
Но если уж на то пошло, то как ни крути, если тебе хочется загрузить в программу, будь то мемо, массив или хз что, в оперативе файл будет висеть условно. Хотя винда распределит ресурсы надеюсь. да кто тебя заставляет читать весь файл сразу??? читай себе по мере необходимости.. но никакими TStringList у тебя этого не выйдет.. так что если не уверен - не советуй!
|
|
|
|
24.04.2010, 02:19
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме:
828081
Репутация:
84
|
|
Сообщение от Serbies
к предыдущему моему сообщению: astonilya ссори не так прочел сообщение
EndLeSSDre@M
randomize; for i:=1 to 20 do mmo1.Text := mmo1.Text+' '+chr(Random(80)+48); - будет генерировать латинские буквы во всех регистрах + цифры
(ссори за неоформленность)
Что-то не знал про функцию chr...спасибо, интересная оказалась
Сейчас мне понадобилось генерить только буквы, и большие и маленькие, накидал функцию может кому пригодится. На вход функции подается количество нужных символов а возвращается строка:
PHP код:
function RandWord(count : integer): string;
var
I: Integer;
begin
result := '';
for I := 0 to count - 1 do
case random(2) of
0: result := result + chr(Random(26)+65);
1: result := result + chr(Random(26)+97);
end;
end;
Последний раз редактировалось GhostOnline; 24.04.2010 в 05:12..
|
|
|
|
24.04.2010, 02:21
|
|
Познающий
Регистрация: 04.11.2007
Сообщений: 51
Провел на форуме:
310791
Репутация:
6
|
|
Отправляю сообщение на форуме.
Вместо русского текста (каторый в memo3.text) отправляются иероглифы :
Уважаемый пользователь.
Send.Add('username=~Maya~');
Send.Add('message='+memo3.Text);
Send.Add('attach_sig=on');
Send.Add('folder=inbox');
Send.Add('mode=post');
Send.Add('post=%CE%F2%EF%F0%E0%E2%E8%F2%FC');
ReplyData.Position:=0;
idhttp1.Post('/forum/privmsg.php', Send,ReplyData );
Подскажите плз
Последний раз редактировалось InfectedM; 24.04.2010 в 02:31..
|
|
|
|
24.04.2010, 02:41
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028
Репутация:
28
|
|
кодировка
|
|
|
|
24.04.2010, 02:51
|
|
Познающий
Регистрация: 04.11.2007
Сообщений: 51
Провел на форуме:
310791
Репутация:
6
|
|
На сайте стоит charset=windows-1251
в проге стоит
IdHTTP1.Request.AcceptCharSet:='windows-1251';
IdHTTP1.Request.CharSet:='windows-1251';
utf8encode пробовал - не помогло
что еще нужно сделать?
Последний раз редактировалось InfectedM; 24.04.2010 в 03:00..
|
|
|
|
24.04.2010, 07:25
|
|
Постоянный
Регистрация: 25.07.2008
Сообщений: 454
Провел на форуме:
1229135
Репутация:
425
|
|
Сообщение от InfectedM
На сайте стоит charset=windows-1251
в проге стоит
IdHTTP1.Request.AcceptCharSet:='windows-1251';
IdHTTP1.Request.CharSet:='windows-1251';
utf8encode пробовал - не помогло
что еще нужно сделать?
utf8ToAnsi();
ansiToUtf8();
|
|
|
|
24.04.2010, 08:26
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563
Репутация:
52
|
|
Сообщение от [stranger]
да кто тебя заставляет читать весь файл сразу??? читай себе по мере необходимости.. но никакими TStringList у тебя этого не выйдет.. так что если не уверен - не советуй!
1. Немного от темы ушел, разговор был о 1 000 000 записей, а не 1 Гб . с чем TSrtingList справляется (проверял). (ограничение 268435455 строк), что бы программа не зависала, лучше запихнуть в поток
2. Критика хорошо, но может тогда подскажешь свой метод решения его проблемы?
Последний раз редактировалось JnK; 24.04.2010 в 08:29..
|
|
|
|
24.04.2010, 13:46
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028
Репутация:
28
|
|
Код:
hF := CreateFile(PChar(filename), GENERIC_READ, 0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
и потом читаешь себе файл через
Код:
ReadFile(hF, buff, 4096, rb, nil);
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
![Аватар для [stranger]](/avatars/avatar113122.gif){kind=avatar}
![Отправить сообщение для [stranger] с помощью ICQ](fusion/misc/im_icq.gif)
Похожие темы
Линейный вид
