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

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

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование_OLD > С/С++, C#, Delphi, .NET, Asm
Перезагрузить страницу [Delphi]/[Pascal] Задай вопрос, получи ответ
   
 
Страница 629 из 677 « Первая < 129529579619 625 626 627 628 629 630 631 632 633 639 > Последняя »
 
Опции темы Поиск в этой теме Опции просмотра

  #6281  
Старый 23.04.2010, 22:57
[stranger]
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028

Репутация: 28
Отправить сообщение для [stranger] с помощью ICQ
По умолчанию
Цитата:
Сообщение от JnK  
1. Лучше массив или StringList, по простой причине не будет отображаться значит скорость больше, но если все же надо отображать, то есть команды вроде как увеличивывают скорость.
угу, подгружаешь файлик в гиг, он себе комфортно размещается в оперативке попутно убив комп..
 

  #6282  
Старый 24.04.2010, 00:44
JnK
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563

Репутация: 52
Smile
Цитата:
Сообщение от [stranger]  
угу, подгружаешь файлик в гиг, он себе комфортно размещается в оперативке попутно убив комп..
Ну 1 лям записей это явно не 1 гиг , Но если уж на то пошло, то как ни крути, если тебе хочется загрузить в программу, будь то мемо, массив или хз что, в оперативе файл будет висеть условно. Хотя винда распределит ресурсы надеюсь.
А насчет убивать комп, зависит от кривизны рук кодера. Можно и одной строкой загнуть комп до состояния - не стояния..

P.s. Кто мешает тебе программно порезать файлить и подгружать частями?
Последний раз редактировалось JnK; 24.04.2010 в 00:47..
 

  #6283  
Старый 24.04.2010, 01:06
[stranger]
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028

Репутация: 28
Отправить сообщение для [stranger] с помощью ICQ
По умолчанию
Цитата:
Сообщение от JnK  
Но если уж на то пошло, то как ни крути, если тебе хочется загрузить в программу, будь то мемо, массив или хз что, в оперативе файл будет висеть условно. Хотя винда распределит ресурсы надеюсь.
да кто тебя заставляет читать весь файл сразу??? читай себе по мере необходимости.. но никакими TStringList у тебя этого не выйдет.. так что если не уверен - не советуй!
 

  #6284  
Старый 24.04.2010, 02:19
GhostOnline
Участник форума
Регистрация: 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..
 

  #6285  
Старый 24.04.2010, 02:21
InfectedM
Познающий
Регистрация: 04.11.2007
Сообщений: 51
Провел на форуме:
310791

Репутация: 6
Отправить сообщение для InfectedM с помощью ICQ
По умолчанию
Отправляю сообщение на форуме.
Вместо русского текста (каторый в 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..
 

  #6286  
Старый 24.04.2010, 02:41
[stranger]
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028

Репутация: 28
Отправить сообщение для [stranger] с помощью ICQ
По умолчанию
кодировка
 

  #6287  
Старый 24.04.2010, 02:51
InfectedM
Познающий
Регистрация: 04.11.2007
Сообщений: 51
Провел на форуме:
310791

Репутация: 6
Отправить сообщение для InfectedM с помощью ICQ
По умолчанию
На сайте стоит charset=windows-1251
в проге стоит
IdHTTP1.Request.AcceptCharSet:='windows-1251';
IdHTTP1.Request.CharSet:='windows-1251';

utf8encode пробовал - не помогло
что еще нужно сделать?
Последний раз редактировалось InfectedM; 24.04.2010 в 03:00..
 

  #6288  
Старый 24.04.2010, 07:25
AlexTheC0d3r
Постоянный
Регистрация: 25.07.2008
Сообщений: 454
Провел на форуме:
1229135

Репутация: 425
Отправить сообщение для AlexTheC0d3r с помощью ICQ
По умолчанию
Цитата:
Сообщение от InfectedM  
На сайте стоит charset=windows-1251
в проге стоит
IdHTTP1.Request.AcceptCharSet:='windows-1251';
IdHTTP1.Request.CharSet:='windows-1251';

utf8encode пробовал - не помогло
что еще нужно сделать?
utf8ToAnsi();
ansiToUtf8();
 

  #6289  
Старый 24.04.2010, 08:26
JnK
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме:
188563

Репутация: 52
По умолчанию
Цитата:
Сообщение от [stranger]  
да кто тебя заставляет читать весь файл сразу??? читай себе по мере необходимости.. но никакими TStringList у тебя этого не выйдет.. так что если не уверен - не советуй!
1. Немного от темы ушел, разговор был о 1 000 000 записей, а не 1 Гб . с чем TSrtingList справляется (проверял). (ограничение 268435455 строк), что бы программа не зависала, лучше запихнуть в поток

2. Критика хорошо, но может тогда подскажешь свой метод решения его проблемы?
Последний раз редактировалось JnK; 24.04.2010 в 08:29..
 

  #6290  
Старый 24.04.2010, 13:46
[stranger]
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028

Репутация: 28
Отправить сообщение для [stranger] с помощью ICQ
По умолчанию
Код:
  
hF := CreateFile(PChar(filename), GENERIC_READ, 0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
и потом читаешь себе файл через
Код:
ReadFile(hF, buff, 4096, rb, nil);
 
 
Страница 629 из 677 « Первая < 129529579619 625 626 627 628 629 630 631 632 633 639 > Последняя »



« Предыдущая тема | Следующая тема »


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


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




ANTICHAT.XYZ