[жекаизжека]

Как можно уменьшить загрузку ЦП exe, что меньше кушала оперативной памяти

[moo2k]

Пиши на Windows API. Но это долго и муторно.

[Vayrus]

Может тебе нужно лишь поменять приоритет процесса, думаю этого тебе хватит?

[жекаизжека]

а как это в коде можно сделать?, а то просто аж 6 метров берет..(((

[жекаизжека]

ау, ну что никто не знает?

[Rat]

Загрузка ЦП и размер памяти, это разные вещи.

Как изменить приоритет, подробно описано здесь

Как оптимизировать приложения на Delphi, описано здесь

Почитай еще вот это

[dmdx]

Почитай несколько книг по оптимизации программ.

1. Один из основных медодов минимизации исходного кода это, как сказал moo2k, использовать API и в памяти меньше места и файл меньше весит.
2. Если тебе критично занимаемое место на диске можно воспользоваться прогой ASPack, но я не думаю что сейчас это актуально.
3. По загрузки с ЦП я присоединюсь к M.A.D.M.A.N., но эта проца увеличивает обработку по времени. На небольших циклах это незаметно. При обработки больших и сверх больших циклов эта проца тоже может отнимать 90% - 99% ресурсов ЦП если обработка проскакивает быстро, хотя не дает программе подвиснуть и повесить ЦП.
Ну например

Код:

while true do begin
Application.ProccessMessage;
Edit1.Text:='1';
end;

Пример чисто теоритический. И иногда делаю небольшую задержку коммандой sleep(10);
Где то здесь я видел аналог этой проце. Хотя проца почти незаменима в циклах.

Хотя мнений может быть много и все они будут правильны по своему. тут надо подходить к каждой ситуации отдельно.

[dmdx]

И еще одно если твоя прога равботает с БД и данными, то данные с БД грузятся в твою прогу и она соответственно растет. т.ч. если она будет весить 20 или 22 метра после некоторых манипцляций это не существенно.

[dmdx]

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

[жекаизжека]

спасибо разобрался

[жекаизжека]

Сообщение от dmdx

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

Если ваша программа редко использует какие либо функции или процедуры, то вынесите их в DLL файл, чтоб память не засоряли (хотя сейчас это и не так важно, памяти оперативной “куча” 1 - 2 гигабайта это уже не редкость, но всё же это подчеркнёт Ваш профессионализм).

ты случайно не знаешь как это можно сделать, если делал можешь подробно описать, зарание благодарен

[Vayrus]

Сообщение от жекаизжека

Если ваша программа редко использует какие либо функции или процедуры, то вынесите их в DLL файл, чтоб память не засоряли (хотя сейчас это и не так важно, памяти оперативной “куча” 1 - 2 гигабайта это уже не редкость, но всё же это подчеркнёт Ваш профессионализм).

ты случайно не знаешь как это можно сделать, если делал можешь подробно описать, зарание благодарен

Многие наоборот стремятся распространять свои программы одним файлом, а ты...
Зачем тебе этот гемор с библиотеками? Тем более если ты новичек. Может уж тогда все программы за тебя писать, не жирно будет? В инете куча готового материала, бери - нехочу (по написанию библиотек в частности) !

[dmdx]

Сообщение от жекаизжека

Если ваша программа редко использует какие либо функции или процедуры, то вынесите их в DLL файл, чтоб память не засоряли (хотя сейчас это и не так важно, памяти оперативной ”куча” 1 - 2 гигабайта это уже не редкость, но всё же это подчеркнёт Ваш профессионализм).

ты случайно не знаешь как это можно сделать, если делал можешь подробно описать, зарание благодарен

1. именно так и делаю выножу в dll обработку которая требуется редко. и дело не в занимаемой памяти. Тут все проще чем меньше прога весит в оперативе тем быстрее и стабильнее она работает.
2. Что сделать? снизить затраты в ЦП и памяти?
3. для увеличение быстродействия не создавайте громоских процеду, а старайтесь делить на небольшие процы и функции.
Например чтение из реестра можно написать двумя способами. Но второй показал более оптимальные параметры и меньшее время (При многократнм обращении).
Способ 1:

Код:

const
  cKeyRoot: HKEY = HKEY_CURRENT_USER ;
  cKey: string = '\Software\MyProg';
Var
 Reg: TRegistry;
function GetStrReg(RootKey:HKey;Key:string):string;
begin
 Reg:=TRegistry.Create;
 Reg.RootKey:=RootKey;
 Reg.OpenKey(Key,False); 
 Result:=Reg.ReadString(Param); 
 Reg.CloseKey;
 Reg.Free; 
end;

Второй способ

Код:

const
  cKeyRoot: HKEY = HKEY_CURRENT_USER ;
  cKey: string = '\Software\ibc';
var
Reg: Tregistry
procedure CreateReg(RootKey: HKEY;Key:string);
begin
Reg:=TRegistry.Create;
Reg.RootKey:=RootKey;
Reg.OpenKey(Key,false);
end;

procedure FreeReg;
begin
 Reg.CloseKey;
 Reg.Free;
end;

function ReadIntReg(RootKey:HKEY; Key,Param: string): integer;
begin
 CreateReg(RootKey,Key,False);
 Result:=Reg.ReadInteger(Param);
 FreeReg;
end;
//----------------------------------------------------------
function ReadStrReg(RootKey:HKEY; Key,Param: string): String;
begin
 CreateReg(RootKey,Key,False);
 Result:=Reg.ReadString(Param);
 FreeReg;
end;

К тому же второй более гибкий