Вверх ↑
Пакеты 
HiAsm4
Windows 
Компоненты 
Cиcтeмa 
Компоненты - DefragMemory

DefragMemory
Краткое описание
Компонент предназначен для дефрагментации памяти и получения полной информации о ее размере
Параметры
  • Dimension - Размерность представления памяти
  • Методы
  • doDefragMemory - Начинает дефрагментацию памяти
  • doStop - Останавливает дефрагментацию памяти
  • События
  • onDefragMemory - Событие происходит всякий раз при изменении режима работы дефрагментатора, выдавая код события в поток. 0 - заполнение и переадресация памяти, 1 - освобождение памяти, 2 - дефрагментация завершена, 3 - принудительная остановка дефрагментации. ARG(CurrentMode)
  • onProgress - Событие происходит всякий раз при изменении процента завершения дефрагментации. ARG(Percent)
  • Свойства
  • MemoryInfo - Содержит информацию о памяти компьютера. ARG(MemoryLoad, TotalPhys, AvailPhys, UsePhys, TotalPageFile, AvailPageFile, UsePageFile, TotalVirtual, AvailVirtual, UseVirtual)
  • Данные
  • MemoryLimit - Верхний предел размера памяти в текущей размерности под дефрагментацию
  • Примеры
    Пример полнофункционального дефрагментатора памяти
    
    Add(MainForm,12489531,238,301)
    {
    Width=478
    Height=190
    Font=[Arial,8,1,0,204]
    Caption="DefragMemory"
    BorderStyle=3
    Position=1
    link(onCreate,10100225:doWork2,[])
    }
    Add(MT_MultiData,4464888,392,315)
    {
    Count=10
    Point(Data)
    Point(RemaindData)
    link(onData1,1422795:doWork1,[])
    link(onData2,1422795:doWork2,[])
    link(onData3,1422795:doWork3,[])
    link(onData4,1422795:doWork4,[])
    link(onData5,15059529:doWork1,[(458,349)(458,356)])
    link(onData6,15059529:doWork2,[(453,356)(453,363)])
    link(onData7,15059529:doWork3,[(448,363)(448,370)])
    link(onData8,15873133:doWork1,[(443,370)(443,391)])
    link(onData9,15873133:doWork2,[(438,377)(438,398)])
    link(onData10,15873133:doWork3,[(433,384)(433,405)])
    link(Data,4100262:Var2,[])
    }
    Add(Button,1854652,175,238)
    {
    Left=155
    Top=135
    Width=80
    Font=[Arial,8,1,0,204]
    TabOrder=-1
    Caption="Start"
    link(onClick,1267245:doSeparateMT,[])
    }
    Add(MT_MultiData,1267245,273,238)
    {
    From=1
    Count=1
    Point(Data)
    link(onData1,11237727:doCalc,[])
    link(Data,4100262:Var1,[(279,224)(378,224)(378,285)])
    }
    Add(GetDataEx,4100262,392,280)
    {
    link(Data,11692057:MemoryInfo,[])
    }
    Add(Hub,3105944,490,245)
    {
    link(onEvent1,10678957:doPosPBar,[(523,251)(523,223)])
    link(onEvent2,3429289:doWork3,[(523,258)(523,424)(375,424)])
    }
    Add(StrList,3749608,448,196)
    {
    Strings=#7:Filling|8:Cleaning|4:Done|5:Abort|
    Point(doGetString)
    Point(onGetString)
    link(onGetString,10678957:doText,[])
    }
    Add(Button,4349466,175,287)
    {
    Left=240
    Top=135
    Width=80
    Font=[Arial,8,1,0,204]
    TabOrder=-1
    Caption="Stop"
    link(onClick,11692057:doStop,[(356,293)(356,251)])
    }
    Add(HubEx,10100225,371,315)
    {
    link(onEvent,4464888:doSeparateMT,[])
    }
    Add(Label,16692783,273,182)
    {
    Left=5
    Top=112
    Width=109
    Height=17
    Font=[MS Sans Serif,8,1,7554575,1]
    Caption="Defrag Memory, %:"
    AutoSize=1
    Alignment=1
    }
    Add(Edit,5546279,322,182)
    {
    Left=120
    Top=110
    Width=40
    Font=[MS Sans Serif,8,1,128,1]
    Text="100"
    DataType=4
    }
    Add(MathParse,11237727,315,238)
    {
    MathStr="%1 * (%2 / 100)"
    link(onResult,11692057:doDefragMemory,[])
    link(X2,5546279:Text,[])
    }
    Add(DefragMemory,11692057,392,238)
    {
    Point(doDimension)
    link(onDefragMemory,3749608:doGetString,[])
    link(onProgress,3105944:doEvent1,[])
    }
    Add(StatusBarEx,10678957,539,203)
    {
    SizeGrip=1
    TextAlign=1
    EnablePBar=0
    PanelPBar=1
    VisiblePBar=0
    PanelHintPBar=0
    Smooth=1
    ColorPBar=7554575
    Ctl3DPBar=1
    Panels=#3:=80|4:=392|
    Point(doPosPBar)
    }
    Add(ChildGroupBox,1422795,483,315)
    {
    }
    BEGIN_SDK
    Add(EditMulti,2581106,21,21)
    {
    WorkCount=4
    Width=139
    Height=158
    link(doWork1,4541589:doText,[(46,27)(46,36)])
    link(doWork2,2234633:doText,[(46,34)(46,71)])
    link(doWork3,406277:doText,[(39,41)(39,106)])
    link(doWork4,6485185:doText,[(32,48)(32,141)])
    }
    Add(GroupBox,13643224,98,77)
    {
    Left=5
    Top=5
    Width=155
    Height=100
    Font=[Arial,8,1,7554575,204]
    Caption="Phisical Memory"
    }
    Add(Label,11056569,97,30)
    {
    Left=10
    Top=20
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Total:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,13824229,104,30)
    {
    Left=10
    Top=40
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Free:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,11457108,111,30)
    {
    Left=10
    Top=60
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Use:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,7743842,118,30)
    {
    Left=10
    Top=80
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Load, %:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,2234633,55,65)
    {
    Left=70
    Top=20
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,406277,55,100)
    {
    Left=70
    Top=40
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,6485185,55,135)
    {
    Left=70
    Top=60
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,4541589,55,30)
    {
    Left=70
    Top=80
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    END_SDK
    Add(RadioButton,10942540,175,343)
    {
    Left=225
    Top=110
    Font=[Arial,8,1,7554575,204]
    TabOrder=-1
    Caption="Byte"
    link(onSelect,10260869:doWork1,[])
    }
    Add(RadioButton,7756452,175,378)
    {
    Left=280
    Top=110
    Font=[Arial,8,1,7554575,204]
    TabOrder=-1
    Caption="Kb"
    link(onSelect,10260869:doWork2,[(219,384)(219,356)])
    }
    Add(RadioButton,4326273,175,413)
    {
    Left=335
    Top=110
    Font=[Arial,8,1,7554575,204]
    TabOrder=-1
    Selected=0
    Caption="Mb"
    link(onSelect,10260869:doWork3,[(223,419)(223,363)])
    }
    Add(ChanelToIndex,10260869,238,343)
    {
    Count=3
    link(onIndex,12808221:doEvent1,[])
    }
    Add(Hub,12808221,294,343)
    {
    link(onEvent1,11692057:doDimension,[(362,349)(362,258)])
    link(onEvent2,3429289:doWork2,[])
    }
    Add(HubEx,3429289,371,350)
    {
    Angle=3
    link(onEvent,10100225:doWork3,[])
    }
    Add(ChildGroupBox,15059529,483,350)
    {
    }
    BEGIN_SDK
    Add(EditMulti,8378409,21,21)
    {
    WorkCount=3
    Width=139
    Height=158
    link(doWork1,10717260:doText,[(35,27)(35,71)])
    link(doWork2,14401728:doText,[(35,34)(35,106)])
    link(doWork3,11686020:doText,[(35,41)(35,141)])
    }
    Add(GroupBox,7412905,91,77)
    {
    Left=160
    Top=5
    Width=155
    Height=100
    Font=[Arial,8,1,7554575,204]
    Caption="Page Memory"
    }
    Add(Label,6589215,90,30)
    {
    Left=10
    Top=20
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Total:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,5307184,97,30)
    {
    Left=10
    Top=40
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Free:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,15245913,104,30)
    {
    Left=10
    Top=60
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Use:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,10717260,48,65)
    {
    Left=70
    Top=20
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,14401728,48,100)
    {
    Left=70
    Top=40
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,11686020,48,135)
    {
    Left=70
    Top=60
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    END_SDK
    Add(ChildGroupBox,15873133,483,385)
    {
    }
    BEGIN_SDK
    Add(EditMulti,7413778,21,21)
    {
    WorkCount=3
    Width=139
    Height=158
    link(doWork1,4079563:doText,[(53,27)(53,71)])
    link(doWork2,6315567:doText,[(46,34)(46,106)])
    link(doWork3,10513288:doText,[(39,41)(39,141)])
    }
    Add(GroupBox,11787086,105,77)
    {
    Left=315
    Top=5
    Width=155
    Height=100
    Font=[Arial,8,1,7554575,204]
    Caption="Virtual Memory"
    }
    Add(Label,1595344,104,30)
    {
    Left=10
    Top=20
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Total:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,10238976,111,30)
    {
    Left=10
    Top=40
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Free:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,12291361,118,30)
    {
    Left=10
    Top=60
    Width=45
    Height=17
    Font=[Arial,8,1,0,204]
    Caption="Use:"
    AutoSize=1
    Alignment=1
    }
    Add(Label,4079563,62,65)
    {
    Left=70
    Top=20
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,6315567,62,100)
    {
    Left=70
    Top=40
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    Add(Label,10513288,62,135)
    {
    Left=70
    Top=60
    Width=80
    Height=17
    Font=[MS Sans Serif,8,1,128,204]
    Caption=""
    AutoSize=1
    }
    END_SDK

    Замечания
    Обновление элемента: [svn]DefragMemory.pas[/svn]
    BB-code статьи для вставки
    Всего комментариев: 0
    (комментарии к статье еще не добавлены)
    Комментарий
    ...