Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.11;
Скачать: CL | DM;

Вниз

Как откомпилировать исходник ~70 Mb?   Найти похожие ветки 

 
Alex____ ©   (2004-06-24 17:55) [0]

Как откомпилировать консольное приложение Delphi размер исходного кода которого около 70 Mb?
Подскажите пожалуйста.


 
Ломброзо ©   (2004-06-24 18:00) [1]

dcc32 myfile.dpr


 
ПсихЪ_клон   (2004-06-24 18:05) [2]


> Alex____ ©   (24.06.04 17:55)

Ты главное время засеки - интересно же!!! Потом расскажешь! (:


 
jack128 ©   (2004-06-24 18:12) [3]

а чем проблема? Или это одним файлом 70 метров. Если так - то этот ивращенец писал - лудше не компилируй ;-)


 
ИМХО ©   (2004-06-24 18:14) [4]

Это операционная система, написанная на Delphi...


 
nikkie ©   (2004-06-24 18:21) [5]

>jack128
лучше пишется через ч...


 
Johnmen ©   (2004-06-24 18:59) [6]

>Alex____ ©   (24.06.04 17:55)  

Откуда взял ?


 
Ломброзо ©   (2004-06-24 21:05) [7]

Кодогенератор, видать


 
ПсихЪ_клон   (2004-06-25 00:13) [8]

Ага, это декомпилированные файлы Виндовса... (:


 
Palladin ©   (2004-06-25 00:18) [9]

Наверное это фотогалерея, выводящаяся через Canvas.Pixels[]... каждый пиксель отдельной строкой...


 
panov ©   (2004-06-28 13:37) [10]

76Мб. исходный код.

ufMain.pas(3009336)
MP.dpr(14)
3009352 lines, 493.53 seconds, 40267228 bytes code, 7745 bytes data.


 
panov ©   (2004-06-28 13:49) [11]

Желающие могут попробовать сами откомпилировать -
http://home.ural.ru/~panov/files/MegaPuper.rar
44кб.


 
raidan   (2004-06-28 14:18) [12]

Лажа.


 
panov ©   (2004-06-28 14:19) [13]

>raidan   (28.06.04 14:18) [12]

Ты о чем так глубокомысленно, выпятив губу?


 
vecna ©   (2004-06-28 15:03) [14]

ПсихЪ_клон
> Ты главное время засеки - интересно же!!! Потом расскажешь! (:

а че тут интересного, у меня исходники 800 мегов, компилится минут за 20


 
Rem   (2004-06-28 15:15) [15]

> у меня исходники 800 мегов

В каком страшном сне ты это придумал? Не позорься!


 
vecna ©   (2004-06-28 15:29) [16]

Rem, а что тут такого позорного ? это огромная корпоративная информационная система под oracle.


 
Anatoly Podgoretsky ©   (2004-06-28 15:59) [17]

panov ©   (28.06.04 13:49) [11]
Ты что подсунул, уже полтора часа компилируется, вечером доложу результаты :-)


 
panov ©   (2004-06-28 16:01) [18]

>Anatoly Podgoretsky ©   (28.06.04 15:59) [17]
А ты dcc32 используешь для компиляции или IDE?


 
Anatoly Podgoretsky ©   (2004-06-28 16:03) [19]

panov ©   (28.06.04 16:01) [18]
Вечером, когда откомпилирую ЭТО га двух компьютерах, а так вккратче ИДЕ


 
panov ©   (2004-06-28 16:05) [20]

>Anatoly Podgoretsky ©   (28.06.04 16:03) [19]
dcc32 значительно быстрее компилирует - около 5-10 минут, из IDE - 30-40 минут


 
MBo ©   (2004-06-28 16:05) [21]

>panov ©   (28.06.04 13:37) [10]
>76Мб. исходный код.
Телепатов нет, код покажи в форуме ;)))))))))


 
_student   (2004-06-28 16:06) [22]

*^&^%%^$&^  какая-то


 
Anatoly Podgoretsky ©   (2004-06-28 16:07) [23]

Славо богу есть модераторы, сразу РО на инфинитн


 
panov ©   (2004-06-28 16:17) [24]

>MBo ©   (28.06.04 16:05) [21]
Телепатов нет, код покажи в форуме ;)))))))))

Сейчас, только дождусь, когда проект в Delphi загрузится...


 
panov ©   (2004-06-28 16:26) [25]

Раз обещал, выкладываю исходник:

unit ufMain;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, ExtCtrls, StdCtrls, ToolWin, ComCtrls;

type
 TForm1 = class(TForm)
   ToolBar1: TToolBar;
   Button1: TButton;
   pb: TPaintBox;
   procedure Button1Click(Sender: TObject);
   procedure FormCreate(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
 X,Y: Integer;
 H,W: Integer;
 cl: Integer;
 i: Integer;
begin
 Randomize;
 H := pb.CLientHeight;
 W := pb.CLientWidth;

 X := Random(H);
 Y := Random(W);
 cl := Random(High(TCOlor));
 pb.Canvas.Pixels[X,Y] := cl;
 X := Random(H);
 Y := Random(W);
 cl := Random(High(TCOlor));
 pb.Canvas.Pixels[X,Y] := cl;

...
//ну тут еще 3 миллиона похожих строк.

 X := Random(H);
 Y := Random(W);
 cl := Random(High(TCOlor));
 pb.Canvas.Pixels[X,Y] := cl;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 Form1.DoubleBuffered := True;
end;

end.


 
Anatoly Podgoretsky ©   (2004-06-28 16:28) [26]

Исходник естественно программно генерировала, вот отсюда и берутся проекты на миллоны строк


 
Anatoly Podgoretsky ©   (2004-06-28 16:30) [27]

Кстати при предудущих измерениях пиписек, никто не заявлял о таких больших проектах. :-)


 
panov ©   (2004-06-28 16:31) [28]

>Anatoly Podgoretsky ©   (28.06.04 16:28) [26]

Исходник естественно программно генерировала, вот отсюда и берутся проекты на миллоны строк

Не угадал...
Всё вручную.


 
Sandman25 ©   (2004-06-28 16:34) [29]

[28] panov ©   (28.06.04 16:31)

мне это напомнило мои ранние опыты с unix редактором joe, было интересно узнать его ограничение на размер редактируемого файла. Строку длиной 10 миллионов символов он копировал уже не очень быстро...


 
Anatoly Podgoretsky ©   (2004-06-28 16:37) [30]

Sandman25 ©   (28.06.04 16:34) [29]
Я каждый месяц работаю с логами своего сервера, как правило более 300 мб, очень медленно но работать можно.


 
Anatoly Podgoretsky ©   (2004-06-28 16:39) [31]

Два часа, компиляьло все трудится, лишь бы до конца работы справился, мне интересно сравнить, зачем я деньги тратил на новый компьютер и не обманул ли Борланд, что 64 мб достаточно


 
Sandman25 ©   (2004-06-28 16:42) [32]

[30] Anatoly Podgoretsky ©   (28.06.04 16:37)

сочувствую. время переходить на запись логов в БД :)


 
Anatoly Podgoretsky ©   (2004-06-28 16:48) [33]

Стандартный Апач на Линуксе, смысла переходить куда либо нет, раз в месяц на 10-20 минут.


 
raidan   (2004-06-28 16:52) [34]

Удалено модератором


 
raidan   (2004-06-28 16:53) [35]


vecna ©   (28.06.04 15:29) [16]
Rem, а что тут такого позорного ? это огромная корпоративная информационная система под oracle.

На Делфях писанная? :-/


 
Mim1 ©   (2004-06-28 18:19) [36]

Это только у меня мания крашить все на модули, или у кого нить еще такая идея возникла когда вы услышали про 800мб? :)


 
Rem   (2004-06-28 19:00) [37]

2 vecna
>> это огромная корпоративная информационная система под oracle.

Подрядили половину Китая для написания?


 
raidan   (2004-06-28 19:09) [38]

Че-то больно много 800 Мб...

Наша система тоже не маленькая, но клиентская часть весит "всего" 90 Мб (правда это Power Builder)...
И серверная - 18 Мб, включая стандартную накачку...


 
Anatoly Podgoretsky ©   (2004-06-28 19:54) [39]

Проверка дома на P-IV 2.4 плата Intel d975/ 1.5 gb dual chanel DDR 400 / Win XP Pro / Delphi 5
dcc 13.36 секунд на все
IDE примерно 1 мин подготовка, затем компиляция 5 сек.
Нагружен только один процессор на 80% (тоже не шедевр), память 285 в пиее

Проверка на работе на Cel-433 / 98 b´mb / Win 98 / Delphi 5
IDE проверку не выдержал, Борланд обманул насчет 64 иб, завтра проверю с dcc

Пока вижу, что не зря деньги на компьютер тратил.


 
Anatoly Podgoretsky ©   (2004-06-28 19:55) [40]

Время работы программ 2 секунды (ATI-9200)



Страницы: 1 2 вся ветка

Текущий архив: 2004.07.11;
Скачать: CL | DM;

Наверх




Память: 0.55 MB
Время: 0.061 c
3-1087320357
Damager
2004-06-15 21:25
2004.07.11
Сохранение БД


1-1088344209
dido
2004-06-27 17:50
2004.07.11
Почему срабатывает KeyDown


3-1087356417
Господин Уэф!
2004-06-16 07:26
2004.07.11
Рушится таблица с автоинкрементным полем.


1-1088451099
romeo
2004-06-28 23:31
2004.07.11
Есть DC, как для него создать Pen, рисующий XOR ом?


3-1087396247
Серг
2004-06-16 18:30
2004.07.11
Параметрический запрос