Как применить функцию c++ в нб
Фарид Дата: Сб, 19 Марта 2011, 15:39 | Сообщение # 1 У меня есть функция (или не знаю ВБскрипт что ли ) для Проверки и замены стандартных параметров в системном реестре Widnows. Visual C++ Добавлено (19 Март 2011, 15:39) sha .
Make(delphi)
Add(MainForm,11541790,42,413)
{
Left=20
Top=105
Width=209
Height=184
Visible=1
TaskBar=1
Position=1
link(onCreate,145 44479:doEvent1,[])
}
Add(ChildForm,4515971,224,56)
{
link(onEvent1,15459982:doEvent1,[(266,62)(266,129)(23,129)(23,167)])
link(onEvent2,11541790:doClose,[(272,69)(272,46)(9,46)(9,440)])
link(onEvent3,15718111:In,[])
link(onEvent4,4521343:In,[])
link(Data1,10312347:Var,[])
}
BEGIN_SDK
Pos(572,165)
Add(EditMulti,2777807,-562,-155)
{
EventCount=4
WorkCount=4
DataCount=1
VarCount=2
Width=1469
Height=5 82
link(doWork1,14864543:doVisible,[(-557,-149)(-557,107)])
link(doWork2,13404931:doValue,[(-482,-142)(-482,2)])
link(doWork3,3438161:doCaption,[(-544,-135)(-544,-96)])
link(doWork4,8081954:In,[(-560,-128)(-560,2)])
link(Var1,5287056:Text,[(-556,299)(-503,299)])
link(Var2,911053:Checked,[(-549,420)(757,420)])
}
Add(MainForm,14864543,-502,73)
{
Left=35
Top=105
Width=218
Height=257
Visible=1
Caption="SpyUser"
BorderStyle=6
Position=1
P oint(doVisible)
}
Add(Label,1654164,-348,206)
{
Left=20
Top=45
Width=115
Height=17
Caption="Качество в процентах"
}
Add(Button,3438161,-530,-102)
{
Left=15
Top=75
Width=180
Caption="Старт"
Point(doCaption)
link(onClick,2777807:onEvent 1,[(73,-96)(73,-149)])
}
Add(Button,11171729,-397,143)
{
Left=60
Top=180
Width=135
Caption="Скрыть окно"
Data=String()
link(onClick,16531303:doEvent2,[(-343,149)(-343,121)])
}
Add(StrCat,13608337,-313,-4)
{
Str1="Кол-во скринов: "
link(onStrCat,68463:doText,[])
link(Str2,13404931:Value,[(-300,-16)(-322,-16)(-322,40)(-363,40)])
}
Add(Memory,13404931,-369,-4)
{
link(onData,13608337:doStrCat,[])
}
Add(Label,68463,-264,-4)
{
Left=15
Top=105
Width=180
Caption="Кол-во скринов: "
}
Add(WinExec,16205920,142,262)
{
FileName="explorer.exe"
link(Params,2808924:Data1,[(155,229)(218,229)])
}
Add(Button,10345376,93,262)
{
Left=15
Top=125
Width=180
Caption="Открыть папку со скринами"
link(onClick,16205920:doExec,[])
}
Add(Edit,5287056,-509,213)
{
Left=140
Top=45
Text="25"
Alignment=2
DataType=1
}
Add(Label,13261118,-334,255)
{
Left=60
Top= 205
Width=135
Caption="Показать окно: Ctrl+Alt+F7"
Alignment=2
Underline=0
}
Add(Button,8988361,394,-102)
{
Left=60
Top=225
Width=135
Caption="Выход"
link(onClick,14270 349:doEvent1,[(480,-96)(480,-103)])
}
Add(StyleXP,1779010,338,150)
{
}
Add(ChildForm,12021834,-404,94)
{
link(onEvent1,14270349:doEvent2,[(506,100)(506,-96)])
link(onEvent2,16531303:doEvent1,[(-346,107)(-346,114)])
}
BEGIN_SDK
Add(EditMulti,14830831,10,10)
{
EventCount=2
WorkCount=1
Width=297
link(doWork1,15722782:doVisible,[(22,16)(22,118)])
}
Add(MainForm,15722782,35,84)
{
Left=35
Top=105
Width=75
Height=55
Visible=1
Caption="!!!"
BorderStyle=6
Position=1
Point(doV isible)
}
Add(Button,5867387,91,126)
{
Left=6
Top=25
Caption="Скрыть"
link(onClick,6629699:doEvent1,[(131,132)(131,139)])
}
Add(Hub,9045574,140,77)
{
link(onEvent1,14830831:onEvent1,[(241,83)(241,16)])
link(onEvent2,13281354:doEvent1,[(180,90)(180,104)])
}
Add(Hub,6629699,140,133)
{
link(onEvent1,13281354:doEvent2,[(180,139)(180,111)])
link(onEvent2,14830831:onEvent2,[(261,146)(261,23)])
}
Add(Hub,13281354,189,98)
{
InCount=2
OutCount=1
link(onEvent1,15722782:doClose,[(244,104)(244,186)(26,186)(26,111)])
}
Add(Button,4555729,91,77)
{
Left=6
Top=2
Caption="Закрыть"
link(onClick,9045574:doEvent1,[])
}
END_SDK
Add(ImgBtn,9313530,-460,94)
{
Left=187
Top=2
Width=20
Split=0
Normal=[ZIP5A01000078DA73F28D626400833220D600626128666460018B3F6140000124F6FFFFFF191678B9309C58B794E1E486E50CA736AF6638B36B0BC3F9837BC0721F4E2D63606 16161E0E0E060E0E1E16110141464101313639091916150820105064AD9A14AAA4130B64A5028428D4B10821D620467AB2505C3D9E54AAA46D4700356360061FF337C]
Select=[ZIP5A01000078DA73F28D626400833220D600626128666460018B3F6140000124F6FFFFFF193A8C75191678B930ACCF486638B16E29C3C90DCB194E6D5ECD7066D71686F307F 780D570707030F0F0F030080A0A3288898931C8C8C83018C38001032A5B090294416C6788300176B9B179318C6D565C8E5093568C609705C3D916CDA570F64C63F36063A2ED7 28100677437E3600300D7CD40C7]
Down=[ZIP5A01000078DA73F28D626400833220D600626128666460018B3F6140000124F6FFFFFF193A8C75191678B930ACCF486638B16E29C3C90DCB194E6D5ECD7066D71686F307F 780D570707030F0F0F030080A0A3288898931C8C8C83018C38001032ADB05029C416C6588300176B9B179318C6D565C8E5093568C609705C3D916CDA570F64C63F36063A2ED5 28200657437E360030071E440C7]
link(onClick,12021834:doWork1,[])
}
Add(Hub,16531303,-320,108)
{
InCount=2
OutCount=1
link(onEvent1,8516379:In,[])
}
Add(LineBreak,710698,-544,94)
{
link(Out,14864543:doClose,[])
Primary=[8516379,273,14]
}
Add(Hub,14270349,527,-109)
{
InCount=2
OutCount=1
link(onEvent1,2777807:onEvent2,[(603,-103)(603,-142)])
}
Add(Button,5447860,205,262)
{
Left=15
Top=150
Width=180
Caption="Удалить скрины"
link(onClick,6794845:doSearch,[])
}
Add(GetData,2808924,212,164)
{
link(Data,2777807:Data1,[(218,-125)(-556,-125)])
}
Add(Message,1705584,779,262)
{
Message="Скрины снесены!"
Caption="!!!"
}
Add(Hub,4285416,716,262)
{
link(onEvent1,2777807:onEvent3,[(752,268)(752,233)(620,233)(620,-135)])
link(onEvent2,1705584:doMessage,[(764,275)(764,268)])
}
Add(FileSearch,6794845,254,262)
{
Ext="*.jpg"
link(onSearch,13664005:doValue,[])
link(onEndSearch,4285416:doEvent1,[(299,275)(299,317)(436,317)(436,268)])
link(Dir,2808924:Data2,[(267,229)(225,229)])
}
Add(FileTools,3569603,387,262)
{
DelToRecycle=1
link(FileName,13664005:Value,[(393,250)(358,250)(358,306)(323,306)])
}
Add(Memory,13664005,317,262)
{
link(onData,3569603:doDelete,[(368,268)(368,282)])
}
Add(CheckBox,16119774,-166,269)
{
Left=5
Width=175
Caption="Загружать вместе с Windows"
link(onCheck,14766334:doCompare,[(-121,275)(-121,310)(-173,310)(-173,324)])
}
Add(Registry,14371263,-89,297)
{
HKey=2
Key="SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
Value="AutoDesktopPlus"
Point(doDelet eValue)
link(onRead,10868342:doCompare,[])
link(Data,14503230:Data1,[(-83,286)(-48,286)])
}
Add(Timer,2231027,-243,185)
{
Interval=10
AutoStop=1
link(onTimer,7721739:doData,[])
}
Add(If_else,14766334,-166,318)
{
Op2=Integer(1)
link(onTrue,14371263:doWrite,[(-109,324)(-109,310)])
link(onFalse,14371263:doDeleteValue,[(-103,331)(-103,317)])
link(Op1,16119774:Checked,[])
}
Add(Memory,16326824,-89,199)
{
link(onData,14371263:doRead,[(-8,205)(-8,279)(-101,279)(-101,303)])
}
Add(If_else,10868342,-40,297)
{
link(onTrue,16119774:doCheck,[(6,303)(6,360)(-184,360)(-184,275)])
link(Op1,14503230:Data2,[(-34,286)(-41,286)])
}
Add(GetData,14503230,-54,241)
{
link(Data,16326824:Value,[(-48,237)(-83,237)])
}
Add(Application,4442554,-194,129)
{
}
Add(DoData,7721739,-194,185)
{
link(onEventData,16326824:doValue,[(-123,191)(-123,205)])
link(Data,4442554:AppFileName,[])
}
Add(CheckBox,911053,751,374)
{
Left=5
Top=20
Width=320
Caption="Стартовать при запуске"
link(onCheck,2777807:onEvent4,[(846,380)(846,-128)])
}
Add(LineBreak,3396144,709,374)
{
link(Out,911053:doCheck,[])
Primary=[8081954,-1225,-378]
}
END_SDK
Add(PictureStream,16013472,903,455)
{
Quality=25
Point(Quality)
link(Bitmap,13443815:Value,[(916,443)(858,443)(858,518)(545,518)])
link(Quality,1150454:Var,[(923,441)(930,441)])
}
Add(ScreenShort,5297870,497,455)
{
link(Handle,2049099:Value,[])
link(onCapture,13443815:doValue,[])
}
Add(Memory,13443815,539,455)
{
link(onData,6489008:doNext,[])
}
Add(StrCat,14110711,707,462)
{
Str2=".jpg"
link(onStrCat,14542197:doValue,[])
link(Str1,16735011:FormatTime,[])
}
Add(WinEnum,4124345,420,133)
{
Point(GetActiveWindow)
}
Add(Timer,3546861,364,273)
{
Enable=1
link(onTimer,15412644:doCompare,[ ])
}
Add(If_else,15412644,420,273)
{
Type=5
link(onTrue,13453506:doData,[(464,279)(464,230)])
link(Op1,13294523:Value,[(426,261)(407,261)(407,320)(552,320)])
link(Op2,1170122:Data1,[])
}
Add(Memory,13294523,546,273)
{
Default=Integer(1)
link(onData,5297870:doCapture,[(590,279)(590,370)(485,370)(485,461)])
}
Add(DoData,13453506,476,224)
{
link(onEventData,13294523:doValue,[(527,230)(527,279)])
link(Data,1170122:Data2,[(482,216)(440,216)])
}
Add(GetData,1170122,427,175)
{
link(Data,4124345:GetActiveWindow,[])
}
Add(Memory,2049099,497,392)
{
Default=Integer(0)
}
Add(Time,16735011,707,413)
{
Format="D-M-Y [h-m-s]"
}
Add(Dir,5402548,798,196)
{
Point(WindowsDir)
}
Add(StrCat,4533118,805,252)
{
Str2="sdata\"
link(onStrCat,14593986:doDir,[(870,258)(870,202)])
link(Str1,5402548:WindowsDir,[(811,240)(832,240)])
}
Add(StrCat,15647444,805,462)
{
link(onStrCat,16013472:doSave,[])
link(Str1,7590857:Data1,[])
link(Str2,14542197:Value,[(818,440)(795,440)(795,506)(762,506)])
}
Add(Memory,14542197,756,462)
{
link(onData,15647444:doStrCat,[])
}
Add(GetData,7590857,805,308)
{
link(Data,4533118:Result,[])
}
Add(Dir,14593986,882,196)
{
}
Add(Counter,5071925,35,238)
{
Max=1
link(onNext,10548400:doCompare,[(79,244)(79,279)(23,279)(23,300)])
}
Add(If_else,10548400,35,294)
{
Op2=Integer(1)
link(onTrue,1478648:doEvent1,[(93,300)(93,286)])
link(onFalse,9666477:doEvent1,[(93,307)(93,342)])
link(Op1,5071925:Count,[])
}
Add(DoData,12807724,168,336)
{
Data=String(Старт)
link(onEventData,15750668:doEvent2,[(212,342)(212,321)])
}
Add(DoData,12148987,168,280)
{
Data=String(Стоп)
link(onEventData,15750668:doEvent1,[(212,286)(212,314)])
}
Add(Hub,1478648,119,280)
{
link(onEvent1,3546861:doTimer,[(155,286)(155,279)])
link(onEvent2,12148987:doData,[(159,293)(159,286)])
}
Add(Hub,9666477,119,336)
{
link(onEvent1,12807724:doData,[])
link(onEvent2,3546861:doStop,[(162,349)(162,380)(313,380)(327,380)(327,286)])
}
Add(Hub,15750668,224,308)
{
InCount=2
OutCount=1
link(onEvent1,4515971:doWork3,[(268,314)(268,195)(212,195)(212,76)])
}
Add(Counter,6489008,595,455)
{
Max=100000
link(onNext,14346100:doEvent1,[])
}
Add(Hub,14346100,644,455)
{
link(onEvent1,2009385:In,[(692,461)(692,398)])
link(onEvent2,14110711:doStrCat,[])
}
Add(LineBreak,172609,553,532)
{
link(Out,6489008:doReset,[(589,538)(589,475)])
Primary=[15718111,-266,-462]
}
Add(LineBreak,6826076,161,63)
{
link(Out,4515971:doWork2,[])
Primary=[2009385,546,329]
}
Add(LineBreak,402357,224,98)
{
Type=1
link(Data,4515971:Var1,[])
Primary=[1150454,700,315]
}
Add(MultiElement,3317047,84,7)
{
link(onEvent1,7280585:doEvent1,[])
}
BEGIN_SDK
Add(EditMulti,160178,10,10)
{
EventCount=1
Width=692
Height=410
}
Add(Timer,2306475,139,82)
{
Interval=1
AutoStop= 1
link(onTimer,4947052:doFor,[])
}
Add(Hub,14528352,454,89)
{
OutCount=4
link(onEvent1,3945680:doCheckMask,[(512,95)(512,48)])
}
Add(DoData,16222513,405,89)
{
link(onEventData,14528352:doEvent1,[])
link(Data,14638577:Position,[(411,74)(333,74)(333,193)(229,193)])
}
Add(Timer,11395238,111,145)
{
Interval=100
link(onTimer,14638577:doFor,[])
}
Add(IndexToChanel,7231194,349,82)
{
link(onEvent2,16222513:doData,[])
}
Add(For,4947052,188,82)
{
Start=1
End=255
link(onEvent,8222756:##add,[])
}
Add(MultiElementEx,8222756,272,82)
{
Mode=1
link(onChange,7231194:doEvent,[])
}
BEGIN_SDK
Add(EditMultiEx,862236,3,3)
{
WorkCount=#5:##add|8:##select|
EventCount=#8:onChange|
Width=237
Height=95
Point(##add)
Point(##select)
link(##select,5597960:doReadKey,[(30,16)(30,55)])
}
Add(Keyboard,5597960,77,49)
{
link(onReadKey,11976760:doData,[])
}
Add(ChangeMon,11976760,140,49)
{
Data=Integer(0)
link(onData,862236:onChange,[(209,55)(209,9)])
}
END_SDK
Add(For,14638577,223,145)
{
Start=1
End=255
link(onEvent,8222756:##select,[(263,151)(263,95)])
}
Add(KeyMask,3945680,539,42)
{
Ctrl=1
Alt=1
Key=118
link(onTrue,160178:onEvent1,[(637,55)(637,16)])
}
END_SDK
Add(LineBreak,15146658,826,357)
{
Type=1
link(Data,7590857:Data2,[(832,349)(818,349)])
Primary=[10312347,-602,-343]
}
Add(Registry,14371263,154,483)
{
HKey=2
Key="SOFTWARE\Microsoft\"
Value="Autospyenabled"
link(onRead,16678436:doCase,[])
}
Add(Case,16678436,196,483)
{
Value=Integer(1)
link(onNextCase,3545729:In,[(233,489)(233,475)])
link(onTrue,1686843:doEvent1,[(262,496)(262,489)])
}
Add(DoData,12672890,245,546)
{
link(onEventData,12018060:In,[])
link(Data,8695892:Var,[])
}
Add(LineBreak,9234691,112,490)
{
link(Out,14371263:doWrite,[])
Primary=[12018060,175,56]
}
Add(LineBreak,15897803,196,546)
{
link(Out,12672890:doData,[])
Primary=[4521343,91,-469]
}
Add(LineBreak,11278120,231,98)
{
Type=1
link(Data,4515971:Var2,[])
Primary=[8695892,14,420]
}
Add(LineBreak,16070718,161,77)
{
link(Out,4515971:doWork4,[])
Primary=[9813570,168,413]
}
Add(LineBreak,13228032,84,56)
{
link(Out,7280585:doEvent2,[(134,62)(134,20)])
Primary=[3545729,154,413]
}
Add(Hub,1686843,287,483)
{
link(onEvent1,1523839:In,[])
link(onEvent2,9813570:In,[])
}
Add(LineBreak,10955373,35,203)
{
link(Out,15459982:doEvent2,[(75,209)(75,199)(23,199)(23,174)])
Primary=[1523839,294,280]
}
Add(Hub,15459982,35,161)
{
InCount=2
OutCount=1
link(onEvent1,5071925:doNext,[(79,167)(79,223)(23,223)(23,244)])
}
Add(Hub,7280585,154,7)
{
InCount=2
OutCount=1
link(onEvent1,4515971:doWork1,[(205,13)(205,62)])
}
Add(Hub,14544479,91,427)
{
link(onEvent1,11668187:In,[])
link(onEvent2,14371263:doRead,[(139,440)(139,489)])
}
Add(LineBreak,4806849,763,252)
{
link(Out,4533118:doStrCat,[])
Primary=[11668187,-623,175]
}
Add(Version,8290759,432,534)
{
Version="1.0.0"
Description="LABsoft® SpyUser"
E-mail="foreman@xaker.ru"
}
Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение отредактировано Фарид - Сб, 19 Марта 2011, 15:41
Сообщение У меня есть функция (или не знаю ВБскрипт что ли ) для Проверки и замены стандартных параметров в системном реестре Widnows. Visual C++ Добавлено (19 Март 2011, 15:39) sha .
Make(delphi)
Add(MainForm,11541790,42,413)
{
Left=20
Top=105
Width=209
Height=184
Visible=1
TaskBar=1
Position=1
link(onCreate,145 44479:doEvent1,[])
}
Add(ChildForm,4515971,224,56)
{
link(onEvent1,15459982:doEvent1,[(266,62)(266,129)(23,129)(23,167)])
link(onEvent2,11541790:doClose,[(272,69)(272,46)(9,46)(9,440)])
link(onEvent3,15718111:In,[])
link(onEvent4,4521343:In,[])
link(Data1,10312347:Var,[])
}
BEGIN_SDK
Pos(572,165)
Add(EditMulti,2777807,-562,-155)
{
EventCount=4
WorkCount=4
DataCount=1
VarCount=2
Width=1469
Height=5 82
link(doWork1,14864543:doVisible,[(-557,-149)(-557,107)])
link(doWork2,13404931:doValue,[(-482,-142)(-482,2)])
link(doWork3,3438161:doCaption,[(-544,-135)(-544,-96)])
link(doWork4,8081954:In,[(-560,-128)(-560,2)])
link(Var1,5287056:Text,[(-556,299)(-503,299)])
link(Var2,911053:Checked,[(-549,420)(757,420)])
}
Add(MainForm,14864543,-502,73)
{
Left=35
Top=105
Width=218
Height=257
Visible=1
Caption="SpyUser"
BorderStyle=6
Position=1
P oint(doVisible)
}
Add(Label,1654164,-348,206)
{
Left=20
Top=45
Width=115
Height=17
Caption="Качество в процентах"
}
Add(Button,3438161,-530,-102)
{
Left=15
Top=75
Width=180
Caption="Старт"
Point(doCaption)
link(onClick,2777807:onEvent 1,[(73,-96)(73,-149)])
}
Add(Button,11171729,-397,143)
{
Left=60
Top=180
Width=135
Caption="Скрыть окно"
Data=String()
link(onClick,16531303:doEvent2,[(-343,149)(-343,121)])
}
Add(StrCat,13608337,-313,-4)
{
Str1="Кол-во скринов: "
link(onStrCat,68463:doText,[])
link(Str2,13404931:Value,[(-300,-16)(-322,-16)(-322,40)(-363,40)])
}
Add(Memory,13404931,-369,-4)
{
link(onData,13608337:doStrCat,[])
}
Add(Label,68463,-264,-4)
{
Left=15
Top=105
Width=180
Caption="Кол-во скринов: "
}
Add(WinExec,16205920,142,262)
{
FileName="explorer.exe"
link(Params,2808924:Data1,[(155,229)(218,229)])
}
Add(Button,10345376,93,262)
{
Left=15
Top=125
Width=180
Caption="Открыть папку со скринами"
link(onClick,16205920:doExec,[])
}
Add(Edit,5287056,-509,213)
{
Left=140
Top=45
Text="25"
Alignment=2
DataType=1
}
Add(Label,13261118,-334,255)
{
Left=60
Top= 205
Width=135
Caption="Показать окно: Ctrl+Alt+F7"
Alignment=2
Underline=0
}
Add(Button,8988361,394,-102)
{
Left=60
Top=225
Width=135
Caption="Выход"
link(onClick,14270 349:doEvent1,[(480,-96)(480,-103)])
}
Add(StyleXP,1779010,338,150)
{
}
Add(ChildForm,12021834,-404,94)
{
link(onEvent1,14270349:doEvent2,[(506,100)(506,-96)])
link(onEvent2,16531303:doEvent1,[(-346,107)(-346,114)])
}
BEGIN_SDK
Add(EditMulti,14830831,10,10)
{
EventCount=2
WorkCount=1
Width=297
link(doWork1,15722782:doVisible,[(22,16)(22,118)])
}
Add(MainForm,15722782,35,84)
{
Left=35
Top=105
Width=75
Height=55
Visible=1
Caption="!!!"
BorderStyle=6
Position=1
Point(doV isible)
}
Add(Button,5867387,91,126)
{
Left=6
Top=25
Caption="Скрыть"
link(onClick,6629699:doEvent1,[(131,132)(131,139)])
}
Add(Hub,9045574,140,77)
{
link(onEvent1,14830831:onEvent1,[(241,83)(241,16)])
link(onEvent2,13281354:doEvent1,[(180,90)(180,104)])
}
Add(Hub,6629699,140,133)
{
link(onEvent1,13281354:doEvent2,[(180,139)(180,111)])
link(onEvent2,14830831:onEvent2,[(261,146)(261,23)])
}
Add(Hub,13281354,189,98)
{
InCount=2
OutCount=1
link(onEvent1,15722782:doClose,[(244,104)(244,186)(26,186)(26,111)])
}
Add(Button,4555729,91,77)
{
Left=6
Top=2
Caption="Закрыть"
link(onClick,9045574:doEvent1,[])
}
END_SDK
Add(ImgBtn,9313530,-460,94)
{
Left=187
Top=2
Width=20
Split=0
Normal=[ZIP5A01000078DA73F28D626400833220D600626128666460018B3F6140000124F6FFFFFF191678B9309C58B794E1E486E50CA736AF6638B36B0BC3F9837BC0721F4E2D63606 16161E0E0E060E0E1E16110141464101313639091916150820105064AD9A14AAA4130B64A5028428D4B10821D620467AB2505C3D9E54AAA46D4700356360061FF337C]
Select=[ZIP5A01000078DA73F28D626400833220D600626128666460018B3F6140000124F6FFFFFF193A8C75191678B930ACCF486638B16E29C3C90DCB194E6D5ECD7066D71686F307F 780D570707030F0F0F030080A0A3288898931C8C8C83018C38001032A5B090294416C6788300176B9B179318C6D565C8E5093568C609705C3D916CDA570F64C63F36063A2ED7 28100677437E3600300D7CD40C7]
Down=[ZIP5A01000078DA73F28D626400833220D600626128666460018B3F6140000124F6FFFFFF193A8C75191678B930ACCF486638B16E29C3C90DCB194E6D5ECD7066D71686F307F 780D570707030F0F0F030080A0A3288898931C8C8C83018C38001032ADB05029C416C6588300176B9B179318C6D565C8E5093568C609705C3D916CDA570F64C63F36063A2ED5 28200657437E360030071E440C7]
link(onClick,12021834:doWork1,[])
}
Add(Hub,16531303,-320,108)
{
InCount=2
OutCount=1
link(onEvent1,8516379:In,[])
}
Add(LineBreak,710698,-544,94)
{
link(Out,14864543:doClose,[])
Primary=[8516379,273,14]
}
Add(Hub,14270349,527,-109)
{
InCount=2
OutCount=1
link(onEvent1,2777807:onEvent2,[(603,-103)(603,-142)])
}
Add(Button,5447860,205,262)
{
Left=15
Top=150
Width=180
Caption="Удалить скрины"
link(onClick,6794845:doSearch,[])
}
Add(GetData,2808924,212,164)
{
link(Data,2777807:Data1,[(218,-125)(-556,-125)])
}
Add(Message,1705584,779,262)
{
Message="Скрины снесены!"
Caption="!!!"
}
Add(Hub,4285416,716,262)
{
link(onEvent1,2777807:onEvent3,[(752,268)(752,233)(620,233)(620,-135)])
link(onEvent2,1705584:doMessage,[(764,275)(764,268)])
}
Add(FileSearch,6794845,254,262)
{
Ext="*.jpg"
link(onSearch,13664005:doValue,[])
link(onEndSearch,4285416:doEvent1,[(299,275)(299,317)(436,317)(436,268)])
link(Dir,2808924:Data2,[(267,229)(225,229)])
}
Add(FileTools,3569603,387,262)
{
DelToRecycle=1
link(FileName,13664005:Value,[(393,250)(358,250)(358,306)(323,306)])
}
Add(Memory,13664005,317,262)
{
link(onData,3569603:doDelete,[(368,268)(368,282)])
}
Add(CheckBox,16119774,-166,269)
{
Left=5
Width=175
Caption="Загружать вместе с Windows"
link(onCheck,14766334:doCompare,[(-121,275)(-121,310)(-173,310)(-173,324)])
}
Add(Registry,14371263,-89,297)
{
HKey=2
Key="SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
Value="AutoDesktopPlus"
Point(doDelet eValue)
link(onRead,10868342:doCompare,[])
link(Data,14503230:Data1,[(-83,286)(-48,286)])
}
Add(Timer,2231027,-243,185)
{
Interval=10
AutoStop=1
link(onTimer,7721739:doData,[])
}
Add(If_else,14766334,-166,318)
{
Op2=Integer(1)
link(onTrue,14371263:doWrite,[(-109,324)(-109,310)])
link(onFalse,14371263:doDeleteValue,[(-103,331)(-103,317)])
link(Op1,16119774:Checked,[])
}
Add(Memory,16326824,-89,199)
{
link(onData,14371263:doRead,[(-8,205)(-8,279)(-101,279)(-101,303)])
}
Add(If_else,10868342,-40,297)
{
link(onTrue,16119774:doCheck,[(6,303)(6,360)(-184,360)(-184,275)])
link(Op1,14503230:Data2,[(-34,286)(-41,286)])
}
Add(GetData,14503230,-54,241)
{
link(Data,16326824:Value,[(-48,237)(-83,237)])
}
Add(Application,4442554,-194,129)
{
}
Add(DoData,7721739,-194,185)
{
link(onEventData,16326824:doValue,[(-123,191)(-123,205)])
link(Data,4442554:AppFileName,[])
}
Add(CheckBox,911053,751,374)
{
Left=5
Top=20
Width=320
Caption="Стартовать при запуске"
link(onCheck,2777807:onEvent4,[(846,380)(846,-128)])
}
Add(LineBreak,3396144,709,374)
{
link(Out,911053:doCheck,[])
Primary=[8081954,-1225,-378]
}
END_SDK
Add(PictureStream,16013472,903,455)
{
Quality=25
Point(Quality)
link(Bitmap,13443815:Value,[(916,443)(858,443)(858,518)(545,518)])
link(Quality,1150454:Var,[(923,441)(930,441)])
}
Add(ScreenShort,5297870,497,455)
{
link(Handle,2049099:Value,[])
link(onCapture,13443815:doValue,[])
}
Add(Memory,13443815,539,455)
{
link(onData,6489008:doNext,[])
}
Add(StrCat,14110711,707,462)
{
Str2=".jpg"
link(onStrCat,14542197:doValue,[])
link(Str1,16735011:FormatTime,[])
}
Add(WinEnum,4124345,420,133)
{
Point(GetActiveWindow)
}
Add(Timer,3546861,364,273)
{
Enable=1
link(onTimer,15412644:doCompare,[ ])
}
Add(If_else,15412644,420,273)
{
Type=5
link(onTrue,13453506:doData,[(464,279)(464,230)])
link(Op1,13294523:Value,[(426,261)(407,261)(407,320)(552,320)])
link(Op2,1170122:Data1,[])
}
Add(Memory,13294523,546,273)
{
Default=Integer(1)
link(onData,5297870:doCapture,[(590,279)(590,370)(485,370)(485,461)])
}
Add(DoData,13453506,476,224)
{
link(onEventData,13294523:doValue,[(527,230)(527,279)])
link(Data,1170122:Data2,[(482,216)(440,216)])
}
Add(GetData,1170122,427,175)
{
link(Data,4124345:GetActiveWindow,[])
}
Add(Memory,2049099,497,392)
{
Default=Integer(0)
}
Add(Time,16735011,707,413)
{
Format="D-M-Y [h-m-s]"
}
Add(Dir,5402548,798,196)
{
Point(WindowsDir)
}
Add(StrCat,4533118,805,252)
{
Str2="sdata\"
link(onStrCat,14593986:doDir,[(870,258)(870,202)])
link(Str1,5402548:WindowsDir,[(811,240)(832,240)])
}
Add(StrCat,15647444,805,462)
{
link(onStrCat,16013472:doSave,[])
link(Str1,7590857:Data1,[])
link(Str2,14542197:Value,[(818,440)(795,440)(795,506)(762,506)])
}
Add(Memory,14542197,756,462)
{
link(onData,15647444:doStrCat,[])
}
Add(GetData,7590857,805,308)
{
link(Data,4533118:Result,[])
}
Add(Dir,14593986,882,196)
{
}
Add(Counter,5071925,35,238)
{
Max=1
link(onNext,10548400:doCompare,[(79,244)(79,279)(23,279)(23,300)])
}
Add(If_else,10548400,35,294)
{
Op2=Integer(1)
link(onTrue,1478648:doEvent1,[(93,300)(93,286)])
link(onFalse,9666477:doEvent1,[(93,307)(93,342)])
link(Op1,5071925:Count,[])
}
Add(DoData,12807724,168,336)
{
Data=String(Старт)
link(onEventData,15750668:doEvent2,[(212,342)(212,321)])
}
Add(DoData,12148987,168,280)
{
Data=String(Стоп)
link(onEventData,15750668:doEvent1,[(212,286)(212,314)])
}
Add(Hub,1478648,119,280)
{
link(onEvent1,3546861:doTimer,[(155,286)(155,279)])
link(onEvent2,12148987:doData,[(159,293)(159,286)])
}
Add(Hub,9666477,119,336)
{
link(onEvent1,12807724:doData,[])
link(onEvent2,3546861:doStop,[(162,349)(162,380)(313,380)(327,380)(327,286)])
}
Add(Hub,15750668,224,308)
{
InCount=2
OutCount=1
link(onEvent1,4515971:doWork3,[(268,314)(268,195)(212,195)(212,76)])
}
Add(Counter,6489008,595,455)
{
Max=100000
link(onNext,14346100:doEvent1,[])
}
Add(Hub,14346100,644,455)
{
link(onEvent1,2009385:In,[(692,461)(692,398)])
link(onEvent2,14110711:doStrCat,[])
}
Add(LineBreak,172609,553,532)
{
link(Out,6489008:doReset,[(589,538)(589,475)])
Primary=[15718111,-266,-462]
}
Add(LineBreak,6826076,161,63)
{
link(Out,4515971:doWork2,[])
Primary=[2009385,546,329]
}
Add(LineBreak,402357,224,98)
{
Type=1
link(Data,4515971:Var1,[])
Primary=[1150454,700,315]
}
Add(MultiElement,3317047,84,7)
{
link(onEvent1,7280585:doEvent1,[])
}
BEGIN_SDK
Add(EditMulti,160178,10,10)
{
EventCount=1
Width=692
Height=410
}
Add(Timer,2306475,139,82)
{
Interval=1
AutoStop= 1
link(onTimer,4947052:doFor,[])
}
Add(Hub,14528352,454,89)
{
OutCount=4
link(onEvent1,3945680:doCheckMask,[(512,95)(512,48)])
}
Add(DoData,16222513,405,89)
{
link(onEventData,14528352:doEvent1,[])
link(Data,14638577:Position,[(411,74)(333,74)(333,193)(229,193)])
}
Add(Timer,11395238,111,145)
{
Interval=100
link(onTimer,14638577:doFor,[])
}
Add(IndexToChanel,7231194,349,82)
{
link(onEvent2,16222513:doData,[])
}
Add(For,4947052,188,82)
{
Start=1
End=255
link(onEvent,8222756:##add,[])
}
Add(MultiElementEx,8222756,272,82)
{
Mode=1
link(onChange,7231194:doEvent,[])
}
BEGIN_SDK
Add(EditMultiEx,862236,3,3)
{
WorkCount=#5:##add|8:##select|
EventCount=#8:onChange|
Width=237
Height=95
Point(##add)
Point(##select)
link(##select,5597960:doReadKey,[(30,16)(30,55)])
}
Add(Keyboard,5597960,77,49)
{
link(onReadKey,11976760:doData,[])
}
Add(ChangeMon,11976760,140,49)
{
Data=Integer(0)
link(onData,862236:onChange,[(209,55)(209,9)])
}
END_SDK
Add(For,14638577,223,145)
{
Start=1
End=255
link(onEvent,8222756:##select,[(263,151)(263,95)])
}
Add(KeyMask,3945680,539,42)
{
Ctrl=1
Alt=1
Key=118
link(onTrue,160178:onEvent1,[(637,55)(637,16)])
}
END_SDK
Add(LineBreak,15146658,826,357)
{
Type=1
link(Data,7590857:Data2,[(832,349)(818,349)])
Primary=[10312347,-602,-343]
}
Add(Registry,14371263,154,483)
{
HKey=2
Key="SOFTWARE\Microsoft\"
Value="Autospyenabled"
link(onRead,16678436:doCase,[])
}
Add(Case,16678436,196,483)
{
Value=Integer(1)
link(onNextCase,3545729:In,[(233,489)(233,475)])
link(onTrue,1686843:doEvent1,[(262,496)(262,489)])
}
Add(DoData,12672890,245,546)
{
link(onEventData,12018060:In,[])
link(Data,8695892:Var,[])
}
Add(LineBreak,9234691,112,490)
{
link(Out,14371263:doWrite,[])
Primary=[12018060,175,56]
}
Add(LineBreak,15897803,196,546)
{
link(Out,12672890:doData,[])
Primary=[4521343,91,-469]
}
Add(LineBreak,11278120,231,98)
{
Type=1
link(Data,4515971:Var2,[])
Primary=[8695892,14,420]
}
Add(LineBreak,16070718,161,77)
{
link(Out,4515971:doWork4,[])
Primary=[9813570,168,413]
}
Add(LineBreak,13228032,84,56)
{
link(Out,7280585:doEvent2,[(134,62)(134,20)])
Primary=[3545729,154,413]
}
Add(Hub,1686843,287,483)
{
link(onEvent1,1523839:In,[])
link(onEvent2,9813570:In,[])
}
Add(LineBreak,10955373,35,203)
{
link(Out,15459982:doEvent2,[(75,209)(75,199)(23,199)(23,174)])
Primary=[1523839,294,280]
}
Add(Hub,15459982,35,161)
{
InCount=2
OutCount=1
link(onEvent1,5071925:doNext,[(79,167)(79,223)(23,223)(23,244)])
}
Add(Hub,7280585,154,7)
{
InCount=2
OutCount=1
link(onEvent1,4515971:doWork1,[(205,13)(205,62)])
}
Add(Hub,14544479,91,427)
{
link(onEvent1,11668187:In,[])
link(onEvent2,14371263:doRead,[(139,440)(139,489)])
}
Add(LineBreak,4806849,763,252)
{
link(Out,4533118:doStrCat,[])
Primary=[11668187,-623,175]
}
Add(Version,8290759,432,534)
{
Version="1.0.0"
Description="LABsoft® SpyUser"
E-mail="foreman@xaker.ru"
}
Автор - Фарид 19 Марта 2011 в 15:39
Сергей Дата: Сб, 19 Марта 2011, 15:41 | Сообщение # 2 Фарид , забудь пока сложные вещи, делай простые. Когда настанет время, будешь стряпать сложные. Мы же тоже не родились "программистами" так же начинали с простых, никому нафиг ненужных вещей. И про реестр тоже забудь! Это очень-очень серьзная тема. Неверная запись может убить систему пользователя, тебе это надо?!
Сообщение Фарид , забудь пока сложные вещи, делай простые. Когда настанет время, будешь стряпать сложные. Мы же тоже не родились "программистами" так же начинали с простых, никому нафиг ненужных вещей. И про реестр тоже забудь! Это очень-очень серьзная тема. Неверная запись может убить систему пользователя, тебе это надо?!Автор - Сергей 19 Марта 2011 в 15:41
Фарид Дата: Сб, 19 Марта 2011, 16:22 | Сообщение # 3 Сергей , да.. ты прав конечно же друг... Ну прост помнишь про мой проект.ну вот функцию хотел добавить. Сам же понимаешь поганые вирусы реестр заражают. Ну ладно Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение Сергей , да.. ты прав конечно же друг... Ну прост помнишь про мой проект.ну вот функцию хотел добавить. Сам же понимаешь поганые вирусы реестр заражают. Ну ладно Автор - Фарид 19 Марта 2011 в 16:22
DEMBEL Дата: Сб, 19 Марта 2011, 16:29 | Сообщение # 4 че те надо то в реестре, скажи конкретно.
Как задавать вопросы
Сообщение че те надо то в реестре, скажи конкретно. Автор - DEMBEL 19 Марта 2011 в 16:29
Фарид Дата: Сб, 19 Марта 2011, 16:45 | Сообщение # 5 Quote (DEMBEL )
че те надо то в реестре, скажи конкретно.
Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение Quote (DEMBEL )
че те надо то в реестре, скажи конкретно.
Автор - Фарид 19 Марта 2011 в 16:45
JozaFF Дата: Сб, 19 Марта 2011, 18:09 | Сообщение # 6 Windows 7 32-bit SP1, Neobook 5.6.2 rus, Mozilla Firefox 4
Сообщение Автор - JozaFF 19 Марта 2011 в 18:09
Фарид Дата: Сб, 19 Марта 2011, 18:30 | Сообщение # 7 Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение Автор - Фарид 19 Марта 2011 в 18:30
Сергей Дата: Сб, 19 Марта 2011, 18:38 | Сообщение # 8 Фарид , пошушарся на форуме, я много раз постил места, где надо ловить этих хороших товарисчей(блокираторов соц-сетей). Но пойми одно, если у тебя засел троян, то твоя программка не спасет тебя. И настаиваю пока заняться простыми вещами и попутно делать проект, в меру понимания вещей...
Сообщение Фарид , пошушарся на форуме, я много раз постил места, где надо ловить этих хороших товарисчей(блокираторов соц-сетей). Но пойми одно, если у тебя засел троян, то твоя программка не спасет тебя. И настаиваю пока заняться простыми вещами и попутно делать проект, в меру понимания вещей...Автор - Сергей 19 Марта 2011 в 18:38
Фарид Дата: Сб, 19 Марта 2011, 18:46 | Сообщение # 9 Сергей , я уже второй год в нб.. Простые вещи уже делал тыс раз Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение Сергей , я уже второй год в нб.. Простые вещи уже делал тыс раз Автор - Фарид 19 Марта 2011 в 18:46
DEMBEL Дата: Сб, 19 Марта 2011, 18:52 | Сообщение # 10 что значит преобразовать? просто посмотри о чем идет речь в коде, поими смысл и сделай то же самое имеющимися инструментами, ничего сверхестественного там нет. Проверить и заменить ключи реестра можно и одними RegRead/RegWrite обойтись, и никакой код смотреть не нужно...
Как задавать вопросы
Сообщение что значит преобразовать? просто посмотри о чем идет речь в коде, поими смысл и сделай то же самое имеющимися инструментами, ничего сверхестественного там нет. Проверить и заменить ключи реестра можно и одними RegRead/RegWrite обойтись, и никакой код смотреть не нужно... Автор - DEMBEL 19 Марта 2011 в 18:52
Сергей Дата: Сб, 19 Марта 2011, 19:08 | Сообщение # 11 Quote (DEMBEL )
просто посмотри о чем идет речь в коде
Quote (Фарид )
оч тяжело да будет?
Quote (Фарид )
Сергей, я уже второй год в нб
Сообщение Quote (DEMBEL )
просто посмотри о чем идет речь в коде
Quote (Фарид )
оч тяжело да будет?
Quote (Фарид )
Сергей, я уже второй год в нб
Автор - Сергей 19 Марта 2011 в 19:08
Peter Дата: Сб, 19 Марта 2011, 21:18 | Сообщение # 12
Вот за одно только это:
Quote (Фарид )
для соц. сети вконтакте.
забанил бы не моргнув глазом!
Жаль в существующих "правилах" этого пункта нет!
- А вам какую операционку поставить - экспи, семерку или висту? При модном втюхе модоподдающимся начинает нравиться
Сообщение
Вот за одно только это:
Quote (Фарид )
для соц. сети вконтакте.
забанил бы не моргнув глазом!
Жаль в существующих "правилах" этого пункта нет!
Автор - Peter 19 Марта 2011 в 21:18
Фарид Дата: Сб, 19 Марта 2011, 21:21 | Сообщение # 13 Quote (DEMBEL )
RegRead/RegWrite обойтись
Quote (Сергей )
как время будет сделаю тебе функцию.
Quote (Сергей )
не преувеличиваешь?
Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение Quote (DEMBEL )
RegRead/RegWrite обойтись
Quote (Сергей )
как время будет сделаю тебе функцию.
Quote (Сергей )
не преувеличиваешь?
Автор - Фарид 19 Марта 2011 в 21:21
Peter Дата: Сб, 19 Марта 2011, 21:26 | Сообщение # 14 Quote (Фарид )
ну как то этим способом нудно
Фарид , программирование это - ТРУД! Причем, непростой!
Quote (Сергей )
время будет сделаю тебе функцию.
- А вам какую операционку поставить - экспи, семерку или висту? При модном втюхе модоподдающимся начинает нравиться
Сообщение Quote (Фарид )
ну как то этим способом нудно
Фарид , программирование это - ТРУД! Причем, непростой!
Quote (Сергей )
время будет сделаю тебе функцию.
Автор - Peter 19 Марта 2011 в 21:26
Сообщение Quote (Peter )
Останется только вставить строчку в нужное место, и... - вуаля!
Автор - mishem 19 Марта 2011 в 21:29
Сергей Дата: Сб, 19 Марта 2011, 22:00 | Сообщение # 16 Quote (Peter )
Ага, и с заранее прописаными параметрами...
Сообщение Quote (Peter )
Ага, и с заранее прописаными параметрами...
Автор - Сергей 19 Марта 2011 в 22:00
Фарид Дата: Сб, 19 Марта 2011, 23:13 | Сообщение # 17 Quote (Сергей )
Прописывать ничего не буду, отправлю готовую пусть разбирается, опыт немалый, сам решит что надо, что нет
Добавлено (19 Март 2011, 23:13)
Quote (Peter )
Ага, и с заранее прописаными параметрами...
Просто хотел вообще узнать как с других программ функции в нб преобразовывать. оказывается не легкая работа
Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение Quote (Сергей )
Прописывать ничего не буду, отправлю готовую пусть разбирается, опыт немалый, сам решит что надо, что нет
Добавлено (19 Март 2011, 23:13)
Quote (Peter )
Ага, и с заранее прописаными параметрами...
Просто хотел вообще узнать как с других программ функции в нб преобразовывать. оказывается не легкая работа
Автор - Фарид 19 Марта 2011 в 23:13
YURIY Дата: Вс, 20 Марта 2011, 02:18 | Сообщение # 18
Quote (Фарид )
Файл в формате .sha.
Это файл программы HiAsm. Причём тут "Цэ" вообще
Сообщение
Quote (Фарид )
Файл в формате .sha.
Это файл программы HiAsm. Причём тут "Цэ" вообще
Автор - YURIY 20 Марта 2011 в 02:18
Фарид Дата: Вс, 20 Марта 2011, 11:12 | Сообщение # 19
YURIY , где скачал,там написано было с++
Не знаю значит не правильно написали..
Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение
YURIY , где скачал,там написано было с++
Не знаю значит не правильно написали..
Автор - Фарид 20 Марта 2011 в 11:12
ip19216811 Дата: Вс, 20 Марта 2011, 13:34 | Сообщение # 20
Quote (Фарид )
Вирус который закрывает доступ в соц сети заражает хост.копируется и наверно записывается в реестр. Моя программка ищет в хосте и в компе.если вирус найден,то он удаляет,а вот если в реестре,то не знаю что делать.. Поиск реестра невозможен,да и всё равно с помощью поиска не реально, я вот поэтому нашел скрипт что ли или функция который проверяет реестр и может ставить стандартные настройки в определенных разделах реестра.
По сути дела, инфицирование файла хостс задача не такая уж и сложная, но вот тот ключ который записывается в реестр, уже говорит по меньшей мере о том что нужен он для запуска утилитки, которая будет постоянно мониторить файл хостс на случай того что юзер руками изменит файл хостс на оригинальный, и явно имеет какой то лоок от его удаления (как самой утилитки так и ключа), по этому сударь задачи которые Вы пытаетесь решить лучше доверить антивирусным продуктам
Сообщение
Quote (Фарид )
Вирус который закрывает доступ в соц сети заражает хост.копируется и наверно записывается в реестр. Моя программка ищет в хосте и в компе.если вирус найден,то он удаляет,а вот если в реестре,то не знаю что делать.. Поиск реестра невозможен,да и всё равно с помощью поиска не реально, я вот поэтому нашел скрипт что ли или функция который проверяет реестр и может ставить стандартные настройки в определенных разделах реестра.
По сути дела, инфицирование файла хостс задача не такая уж и сложная, но вот тот ключ который записывается в реестр, уже говорит по меньшей мере о том что нужен он для запуска утилитки, которая будет постоянно мониторить файл хостс на случай того что юзер руками изменит файл хостс на оригинальный, и явно имеет какой то лоок от его удаления (как самой утилитки так и ключа), по этому сударь задачи которые Вы пытаетесь решить лучше доверить антивирусным продуктам
Автор - ip19216811 20 Марта 2011 в 13:34
Фарид Дата: Вс, 20 Марта 2011, 17:22 | Сообщение # 21 ip19216811 , Дата регистрации: Вс, 30 Мая 2010, 21:05
Сообщение ip19216811 , Автор - Фарид 20 Марта 2011 в 17:22
Сергей Дата: Чт, 24 Марта 2011, 01:56 | Сообщение # 22 Фарид , на тебе проверку на ключевые записи RacAutoIt3x Сообщение отредактировано Сергей - Чт, 24 Марта 2011, 02:09
Сообщение Фарид , на тебе проверку на ключевые записи RacAutoIt3x Автор - Сергей 24 Марта 2011 в 01:56
не преувеличиваешь?
не ожидал) огромное спасибоооо 
