artbear
15.12.2004 - 15:00 |
:)
13 - , 1!
, .
--------------------------------------------------------------------
- aka orefkov
--------------------------------------------------------------------
+ ( )
http://openconf.itland.ru/beta
FAQ
http://1c.alterplast.ru/faq/telepat.html
http://1c.alterplast.ru/faq/openconf.html
/ ( !!)
http://1c.proclub.ru/modules/mydownloads/viewcat.php?op=&cid=1002
/
http://1c.alterplast.ru/faq/telepat.html
. ( .. )
http://itland.ru/forum/index.php?showforum=37
- - , , , http://openconf.itland.ru
, ,
http://1c.proclub.ru/modules/mydownloads/submit.php
:)
----------------------------------------------------
(fez) , .. .
, , .
1) , .. WinCVS .
2)
|
1 - 15.12.2004 - 15:09 |
... -- ... - - , 24 . . Telepat , . |
artbear
2 - 15.12.2004 - 15:09 |
(ALL)
( ):
v2.0.0.0p
-------------------------------------------------------
-
- " "
- . "" - .
,
""
. .
,
.
- Ctrl+Shift+1.
SendCommand 22511
-
- XP W2K3
-------------------------------------------------------
http://openconf.itland.ru/beta/telepatp.zip |
3 - 15.12.2004 - 15:14 |
ALL, 1), ? |
a13x
4 - 15.12.2004 - 15:15 |
+(1)
ctrl+shift+1 -
SendCommand -
- , , - |
KVA
5 - 15.12.2004 - 15:16 |
+1 :(((
: : ? |
slavka
6 - 15.12.2004 - 15:17 |
- 13 :) |
7 - 15.12.2004 - 15:19 |
, 22 , R . |
IAm
8 - 15.12.2004 - 15:22 |
(5) , API
Dim Rct As RECT
Dim PtsBottomRight As POINTAPI
GetClientRect HWndDescr, Rct
PtsBottomRight.x = Rct.Right
PtsBottomRight.y = Rct.Bottom
ClientToScreen HWndDescr, PtsBottomRight |
a13x
9 - 15.12.2004 - 15:26 |
13 :-)) , , ...
, 113 , ? :-))) |
slavka
10 - 15.12.2004 - 15:28 |
23 |
KVA
11 - 15.12.2004 - 15:28 |
(8) , |
12 - 15.12.2004 - 15:31 |
23, 24 . , . |
a13x
13 - 15.12.2004 - 15:34 |
21 ,
..
|
Kabz
14 - 15.12.2004 - 15:38 |
24 |
15 - 15.12.2004 - 15:39 |
! ! |
SlaBoy
16 - 15.12.2004 - 15:57 |
... 24-SQL - .... ( ;) |
slavka
17 - 15.12.2004 - 16:10 |
(12) 24 :) |
orefkov
18 - 15.12.2004 - 16:18 |
.
.
HKEY_CURRENT_USER\Software\1C\1Cv7\7.7\< >\Config\ToolbarSystem
. . , .
,
. |
SlaBoy
19 - 15.12.2004 - 16:42 |
8- , - Ctrl+1 ?.. |
a13x
20 - 15.12.2004 - 16:51 |
(18)
(21 SQL , winxp sp1)
:-) :-( |
KVA
21 - 15.12.2004 - 17:00 |
18 (23 SQL win XP SP) |
orefkov
22 - 15.12.2004 - 17:01 |
1018
http://openconf.itland.ru/beta/ocb1018.zip |
orefkov
23 - 15.12.2004 - 17:03 |
(19)
, |
slavka
24 - 15.12.2004 - 17:11 |
. . :))
!!! |
a13x
25 - 15.12.2004 - 17:28 |
(22) , - , :-(... :-)))
- - " - " " ", - ,
, ProcessList - CtrlAltDel Beep
taskkill -
, ...
..
, "" - disabled, ? |
Kabz
26 - 15.12.2004 - 17:57 |
24 , .
-v2.0.0.0p -1018 |
Matic
27 - 15.12.2004 - 18:00 |
1018 2000 WinXP SP1 1c23dbf. HKEY_CURRENT_USER\Software\1C\1Cv7\7.7\< >\Config\ToolbarSystem
.
Ctrl+1 . , . Ctrl+Shift+1 . |
28 - 16.12.2004 - 06:43 |
1018 2000 WinXP SP2 1c24.
, 1 ,
??? |
artbear
29 - 16.12.2004 - 06:55 |
, (25).
, .
, 1 1 18 |
MetaEditor
34 - 16.12.2004 - 07:55 |
24 , 21...
...
, http://openconf.itland.ru/beta/ ...? ...
32) : - ... |
artbear
36 - 16.12.2004 - 08:07 |
(34) .
, /, :) |
fez
38 - 16.12.2004 - 08:28 |
http://1c.alterplast.ru/faq/telepat.html |
6
39 - 16.12.2004 - 09:09 |
orefkov
, ! !
XP SP2, 1C 21 |
SlaBoy
40 - 16.12.2004 - 09:25 |
! - ! ( - ;)
, 2-4, 124-
(34) 23 - , ;) |
orefkov
41 - 16.12.2004 - 09:25 |
, ""
. XP. . |
trdm
42 - 16.12.2004 - 09:46 |
........
Sub TestHTM()
Set HTMLWind = CreateObject("htmlfile")
Set Window = HTMLWind.frames.Window
Window.showModalDialog("file:///C:/HTMLPage1.htm")
End Sub
, : ", ."
? |
trdm
43 - 16.12.2004 - 13:41 |
? :
openconfa?
, . |
artbear
44 - 16.12.2004 - 13:52 |
(Orefkov) , .
1) "W:\1.ert" Documents.Open .
2)
Sub Configurator_OnFileDialog(Saved, Caption, Filter, FileName, Answer)
sFileName = "W:\1.ert"
If sFileName <> "" Then
FileName = sFileName
Answer = mbaOK
End If
End Sub
,
>> W:\1.ert\\c~sw
1, 2 3 |
45 - 16.12.2004 - 13:56 |
(43) + + .
, -
" =", "", .
" " = , , ... |
artbear
46 - 16.12.2004 - 13:59 |
(43)
:
, , -, , , .
ADirks :)
, (0)
- WShExtra.dll
Windows Scripting Solutions [http://www.winnetmag.com/Files/07/23601/23601.zip]
:
Sub OpenFileFromClipboard()
sFileNameForOpening = GetFileNameFromClipboard()
If sFileNameForOpening <> "" Then
Documents.Open sFileNameForOpening
End If
End Sub
Function GetFileNameFromClipboard()
GetFileNameFromClipboard = ""
Set clip = Nothing
On Error Resume Next
Set clip = CreateObject("WshExtra.Clipboard")
On Error Goto 0
If clip Is Nothing Then
Exit Function
End If
strText = clip.Paste()
strText = Trim(strText)
If InStr(strText, Chr(34)) = 1 Then
strText = Mid(strText, 2)
End If
If InStrRev(strText, Chr(34)) = Len(strText) Then
strText = Mid(strText, 1, Len(strText) - 1)
End If
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists(strText) Then
GetFileNameFromClipboard = strText
End If
End Function
Sub Configurator_OnFileDialog(Saved, Caption, Filter, FileName, Answer)
if Saved then Exit Sub
sFileNameForOpening = GetFileNameFromClipboard()
If sFileNameForOpening <> "" Then
If MsgBox(" " & sFileNameForOpening & "?", vbYesNo, SelfScript.Name) = vbYes Then
Documents.Open sFileNameForOpening
Answer = mbaCancel
End If
End If
sFileNameForOpening = ""
End Sub |
Phoenix
47 - 16.12.2004 - 14:02 |
(43)
- ExtFormsTree ( )
- SubSystems ( , , , ) |
artbear
48 - 16.12.2004 - 14:12 |
(43) , , ( ) , .
-, , .
? |
a13x
49 - 16.12.2004 - 14:35 |
(43) ? ?
, ...
.
:
- CommonServices.wsc
- 1 ( , , - )
- doxygen
- , -
- Vim, , - ...
.
, - (, , - ?)
- , , ,
- - - , - , , , ( ), , (, WinCVS) --- , , , , , - ? |
trdm
50 - 16.12.2004 - 14:56 |
(45) " " ?
CVS WinCVS :(
(49) ""?
SubS3:
+ .
- :
* .
* ().
* .
* (/).
* .
* ( .)
* ( *.efd)
* (, , , ...)
+ .
* , () + -
* *.efd
+ (ert txt) .
+ 1++.
+ dd|dds
.
~ dots, .
, -.
:) |
a13x
51 - 16.12.2004 - 15:02 |
(50) fez' :-)))
|
trdm
52 - 16.12.2004 - 15:06 |
(47) "" "SubS3"? |
Phoenix
53 - 16.12.2004 - 15:16 |
(52) , , , . |
jbond
54 - 16.12.2004 - 15:28 |
Web- WinCVS ?
.
(51) - - . |
trdm
55 - 16.12.2004 - 15:36 |
(53) . ( ).
(54) ? %) |
Phoenix
56 - 16.12.2004 - 16:03 |
(55) ? |
SlonSpb
57 - 16.12.2004 - 16:13 |
. , 21- SQL (5 ), . ( ) , 1 . ( ) - . artbear. |
trdm
58 - 16.12.2004 - 16:14 |
(56) , , , IDConf ... , ....
(48) ..
" " ....
win Send To...
. ">", .
.
.
? |
trdm
59 - 16.12.2004 - 16:20 |
(56) .
. . ( IExplorerom).
. |
Phoenix
60 - 16.12.2004 - 16:24 |
(58) , . |
trdm
61 - 16.12.2004 - 16:31 |
(60) . :) |
trdm
62 - 16.12.2004 - 17:05 |
.
. :
, ......
Library ADODB
C:\Program Files\Common Files\system\ado\msado15.dll
Microsoft ActiveX Data Objects 2.7 Library
Library DHTMLPAGELIB
C:\Program Files\Common Files\designer\MSHTMPGR.DLL
Microsoft DHTML Page Runtime Library 1.0
Library EventSystemLib
C:\WINDOWS\System32\es.dll
EventSystem 1.0 Type Library
Library HTMDLGSLib
C:\Program Files\Microsoft Office\Office10\VS Runtime\htmdlgs.dll
HTML Dialogs 1.0 Type Library
Library MSAdodcLib
C:\WINDOWS\System32\MSADODC.OCX
Microsoft ADO Data Control 6.0 (OLEDB)
Library MSComctlLib
C:\WINDOWS\System32\MSCOMCTL.OCX
Microsoft Windows Common Controls 6.0 (SP6)
Library MSFlexGridLib
C:\WINDOWS\System32\msflxgrd.ocx
Microsoft FlexGrid Control 6.0 (SP3)
Library MSForms
C:\WINDOWS\System32\FM20.DLL\2
Microsoft Forms 2.0 Object Library
Library MSHierarchicalFlexGridLib
C:\WINDOWS\System32\MSHFLXGD.OCX
Microsoft Hierarchical FlexGrid Control 6.0 (OLEDB)
Library MSHTML
C:\WINDOWS\System32\MSHTML.TLB
Microsoft HTML Object Library
Library MSXML2
C:\WINDOWS\System32\msxml4.dll
Microsoft XML, v4.0
Library OpenConf
C:\Program Files\1Cv77\BIN19\config.tlb
1 7.7
Library SHDocVw
C:\WINDOWS\System32\shdocvw.dll
Microsoft Internet Controls
Library SVCSVCLib
C:\Program Files\1Cv77\BIN19\svcsvc.dll
Library TELEPATLib
C:\Program Files\1Cv77\BIN19\config\telepat.dll
"" |
artbear
63 - 16.12.2004 - 17:22 |
(58) , .
, ( , ), . |
6
64 - 17.12.2004 - 07:29 |
( 1++).
, Visual 1C++.
? |
slavka
65 - 17.12.2004 - 08:57 |
WorkWithReestr:
.
http://1c.proclub.ru/modules/mydownloads/personal.php?cid=1001&lid=4447
TelepatSettings:
"".
, "" , "" .
( ).
"WorkWithReestr" "svcsvc" .
:
UnloadTelepatSettings() "" telepat_settings.set( ), BinDir & "Config\" .
LoadTelepatSettings() "" telepat_settings.set.
!!!!!
LoadTelepatSettings() .
WORKWITHREESTR!!!
http://1c.proclub.ru/modules/mydownloads/personal.php?cid=1001&lid=4498 |
artbear
66 - 17.12.2004 - 09:13 |
(65) . |
slavka
67 - 17.12.2004 - 09:17 |
. |
artbear
68 - 17.12.2004 - 09:24 |
(67) |
slavka
69 - 17.12.2004 - 09:31 |
(68) |
Matic
70 - 17.12.2004 - 11:02 |
.
, :
.
= 1 ; ;
.
:
= 1
;
; |
a13x
71 - 17.12.2004 - 14:43 |
2(ALL)
-
? , .
, :
-------------------------------------------------------
Sub Telepat_OnTemplate(Name, Text, Cancel)
Cancel = true
' , onvertTemplate
Message Text
End Sub
Sub Telepat_OnInsert(InsertType, InsertName, Text)
End Sub
Sub TestMacro()
text = Telepat.ConvertTemplate("<?""Enter data:"">","rrr")
End Sub
-------------------------------------------------------
:-(
.
.
(/ ..)
, ,
, , ,
, , - ,
, , 1 ...
.
, *.st .
, ,
, .
.
2 :
, .
( user story):
-------------------
// ""
var tmpl = Telepat.TemplateByName("");
if (tmpl) {
tmpl.Set("", ""); //
doc.Range(doc.SelStartLine) = tmpl.Text; //
}
-------------------
:
-------------------
<?>()
<?>
//<?>
-------------------
, -
,
1 ; ,
...
.
, ALL? |
artbear
72 - 17.12.2004 - 14:54 |
(71) , , , :( |
a13x
73 - 18.12.2004 - 09:30 |
2(ALL) CommonServices.wsc...
, , , xml <?xml version="1.0" encoding="windows-1251"?>, (), , .
.
, , , -
http://kuntashov.narod.ru/files/OpenConfCommonServices.zip |
artbear
74 - 18.12.2004 - 16:11 |
(Orefkov) , , ProgID (- )
{578f85c8-89eb-4cda-ac7e-8f3bb34e8b54} |
trdm
75 - 18.12.2004 - 18:24 |
?
:
.....
.
, (, , , , IF) . ( ) .
GoBack() -
GoForward() - .
http://1c.proclub.ru/modules/mydownloads/personal.php?cid=1001&lid=4507 |
a13x
76 - 18.12.2004 - 18:58 |
(75)
, MatchPair - __ ,
1 - Ctrl+] Ctrl+[
, ! , , ... |
a13x
77 - 18.12.2004 - 20:00 |
, :-))) ( trdm' , , , , :-)... ( , , doc )
-----------------------------------------------
var OCS; // as OpenConf.CommonServices
var Timer;
var startLine = -1 ;
function SelectBlock()
{
var cw, ssl, sel, doc = null;
if (!(doc = OCS.GetTextDocIfOpened(0))) {
return;
}
cw = doc.CurrentWord;
startLine = doc.SelStartLine;
OCS.WSH.SendKeys("^{[}");
Timer = CfgTimer.SetTimer(1, true);
}
function Configurator::OnTimer(tId)
{
var doc;
if (tId == Timer) {
if ((startLine > -1)&&(doc = OCS.GetTextDocIfOpened(0))) {
doc.MoveCaret(startLine, 0, doc.SelStartLine, doc.LineLen(doc.SelStartLine)-1);
}
CfgTimer.KillTimer(Timer);
}
}
function Init(_)
{
if (!(OCS = new ActiveXObject("OpenConf.CommonServices"))) {
Message(' "OpenConf.CommonServices!"', mRedErr);
Message(" "+SelfScript.Name+" !", mInformation);
Scripts.Unload(SelfScript.Name);
}
OCS.SetConfig(Configurator);
}
Init(); |
trdm
78 - 18.12.2004 - 21:24 |
--....
(76 - Ctrl+]) , :) , shift-, "" "" "" .. :) ....
(All) Orefkov , , , " .." , / / , -..... |
a13x
79 - 19.12.2004 - 10:03 |
(78) , (, - ?) (77) , :-)
.
, , :-))
.
- ? , , ... |
trdm
80 - 19.12.2004 - 10:55 |
(79) :)
, ctrl+[ , , ctrl+[ .... |
trdm
81 - 19.12.2004 - 10:57 |
+ : :). (79), :) |
a13x
82 - 19.12.2004 - 11:03 |
, ,
if (startLine <= doc.selStartLine) {
doc.MoveCaret(startLine, 0, doc.SelStartLine, doc.LineLen(doc.SelStartLine)-1);
}
else {
doc.MoveCaret(doc.SelStartLine, 0, startLine, doc.LineLen(doc.SelStartLine)-1);
} |
artbear
83 - 19.12.2004 - 12:09 |
(80) , , Ctrl+[ . / ! |
artbear
84 - 19.12.2004 - 12:22 |
(83+) :)
, , :) |
MetaEditor
85 - 19.12.2004 - 12:27 |
, ...
...Ctrl+[, Ctrl+],Ctrl+Shift+[, Ctrl+Shift+]...
80) ...
...... , ...
...
... , Ctrl+Shift+[... SendCommand(?) ? |
MetaEditor
86 - 19.12.2004 - 12:29 |
+85) (80) (83) |
a13x
87 - 19.12.2004 - 12:29 |
(85) SendKeys |
artbear
88 - 19.12.2004 - 12:34 |
, Ctrl+[ Ctrl+] :) |
MetaEditor
89 - 19.12.2004 - 12:34 |
87) ...
Spy ... ...
... |
trdm
90 - 19.12.2004 - 20:14 |
(88) , ctrl+... ..... |
trdm
91 - 19.12.2004 - 20:22 |
Spy++ ? , : "SPYHK55.DLL" + ?
: 239 (244_836 ) |
artbear
92 - 20.12.2004 - 06:48 |
(90) , Ctrl + [ |
artbear
93 - 20.12.2004 - 11:50 |
(ALL) , :
. , .
, . |
trdm
94 - 20.12.2004 - 12:40 |
, ....
, , , .... :) |
95 - 20.12.2004 - 12:58 |
, - - , .
1) - +.
2) , SYSTEMS -, - .
: , - , . |
6
96 - 20.12.2004 - 13:04 |
(95)
!
: "TODO" . (64) . |
97 - 20.12.2004 - 13:11 |
, - - Config , . . : , - , . . . - , , . |
artbear
98 - 20.12.2004 - 13:53 |
(95) 2) |
artbear
99 - 20.12.2004 - 13:55 |
(96) , .
1++ , 1++/ 1++ |
artbear
100 - 20.12.2004 - 14:00 |
(98+) (, )
Echo("___________________________________________________________________________");
Echo(" () , 2002");
Echo(" \" 1\"");
Echo("");
// Registrtion script
var dlls=new Array(
"atl.dll",
"ArtWin.dll"
);
var arrInWindows98=new Array(
true,
false
);
var WshShell = new ActiveXObject("WScript.Shell")
var unr=false;
if(WScript.Arguments.Count()>0) unr=WScript.Arguments(0)=="U";
if(unr)
unregisterAll();
else
registerAll();
//// Script Host
// Echo " Windows Script Host 5.6 !"
var ver = Number(ScriptEngineMajorVersion() + "." + ScriptEngineMinorVersion())
if (ver < 5.6)
Echo(" Windows Script Host 5.6 !");
function registerAll(){
runAll(dlls)
}
function runAll(dlls, par){
var bWindows98=Boolean(IsWindows98());
for(var i in dlls)
{
if (bWindows98)
{
if (!runreg(i, dlls[i], par))
break;
}
else
{
var j=(par==null)?i:dlls.length-i-1; // reverse
if (!arrInWindows98[j])
runreg(i, dlls[i], par);
}
}
} //runAll
function unregisterAll(){
runAll(dlls.reverse(), "/U")
}
function runreg(i, dll, par){
var fullPath=WshShell.CurrentDirectory+"\\"+dll;
// var cl="regsvr32 /s "+((par==null)?"":par+" ")+"scrobj.dll /n /i:\""+fullPath+"\"";
var cl="regsvr32 /s "+((par==null)?"":par+" ")+"\""+fullPath+"\"";
Echo(" "+"["+(new Number(i)+1)+"/"+dlls.length+"]:"+cl);
var errcode=WshShell.Run(cl,1,true);
Echo(((errcode==0)?"OK":"")+" ( ="+errcode+")");
return (errcode==0)?true:false;
} //runreg
function IsWindows98()
{
if (WshShell.ExpandEnvironmentStrings("%OS%")=="%OS%") // Windows 98
return true;
else // Windows NT/2000/XP
return false;
} //IsWindows98
function Echo(message){
WScript.Echo(message);
return true;
} //Echo |
101 - 20.12.2004 - 14:00 |
98) , - ! . |
102 - 20.12.2004 - 14:03 |
100 - .... - , , - ? |
MetaEditor
103 - 20.12.2004 - 14:07 |
102)regsvr32 /s - silent mode |
artbear
104 - 20.12.2004 - 14:16 |
(102) , , -
.
for /r %i in (*.dll) do regsvr32 /s "%i"
ocx
for /r %i in (*.ocx) do regsvr32 /s "%i"
for /r %i in (*.dll) do regsvr32 /s /u "%i"
ocx
for /r %i in (*.ocx) do regsvr32 /s /u "%i"
, :(
, (100) |
skafandr
105 - 20.12.2004 - 14:18 |
, http://1c.proclub.ru/ ? - , .
! |
artbear
106 - 20.12.2004 - 14:26 |
(105) . (0)
, . |
artbear
107 - 20.12.2004 - 14:35 |
(106+) , . |
6
108 - 20.12.2004 - 14:44 |
artbear
Visual Studio: , :
//TODO - .
, , "". . |
a13x
109 - 20.12.2004 - 15:17 |
(108)
, +
( doxygen - xml , - )
|
trdm
110 - 20.12.2004 - 15:18 |
(108) , ( , )
"//TODO - ", ? |
slavka
111 - 20.12.2004 - 15:27 |
(95) .
(artbear) |
112 - 20.12.2004 - 15:29 |
111)! . |
artbear
113 - 20.12.2004 - 15:31 |
(trdm) .
.
3 |
114 - 20.12.2004 - 15:32 |
2(108) , "//TODO"? :) |
a13x
115 - 20.12.2004 - 15:36 |
(114) - , - - :-)
|
6
116 - 20.12.2004 - 15:57 |
(114)
|
a13x
117 - 20.12.2004 - 16:37 |
(116) , , , |
trdm
118 - 20.12.2004 - 16:47 |
(artbear) ( , ) :( + .....
, ... :)
(117) () .... .... |
a13x
119 - 20.12.2004 - 17:06 |
(118) ,
, |
artbear
120 - 20.12.2004 - 17:19 |
(trdm) |
RVV
121 - 20.12.2004 - 17:28 |
!!!
1- ,( - "\"). , ... |
artbear
122 - 20.12.2004 - 17:28 |
(119) , ,
1) ( );
2) / ( TODO).
, .
, , FilterValue .
"/ " , "". , , ++ . |
artbear
123 - 20.12.2004 - 17:31 |
(122+) , 1++, " 1++" |
artbear
124 - 20.12.2004 - 17:47 |
(123+) , : 1++ ! |
Phoenix
125 - 21.12.2004 - 09:14 |
up |
artbear
126 - 21.12.2004 - 10:49 |
C !
/ , , - !
, - / ?
, ?
, - , :) |
127 - 21.12.2004 - 10:58 |
"" 8- ? |
a13x
128 - 21.12.2004 - 11:02 |
(126) , ( ..), ? , - , , ... , , ... ? |
trdm
129 - 21.12.2004 - 11:04 |
(120) . |
a13x
130 - 21.12.2004 - 11:04 |
(127) , ? |
trdm
131 - 21.12.2004 - 11:06 |
:) |
ADirks
132 - 21.12.2004 - 11:10 |
(128) - 1 . - , . - , ( ). - .
gcomp' , correct_dlg.pl ( ). |
trdm
133 - 21.12.2004 - 11:16 |
(127) 8- :) ..... |
134 - 21.12.2004 - 11:20 |
(130,133) 8.0 CodeComplete ? |
a13x
135 - 21.12.2004 - 11:22 |
(132) . ... -
#define i j
// happy debugging! |
a13x
136 - 21.12.2004 - 11:26 |
(134) Ctrl+ ? |
137 - 21.12.2004 - 11:30 |
(136) , ... :)))) |
138 - 21.12.2004 - 11:35 |
2(132) , 1 . |
a13x
139 - 21.12.2004 - 11:40 |
(138) , - ? "... !" :-) |
trdm
140 - 21.12.2004 - 12:00 |
...
SubS3 ..:
// "SubS3"
function ShowSubS3()
{
var Win = Windows.FirstWnd;
NeedWin = "";
if (Win) {
do
{
if (Win.caption == "SubS3") NeedWin = Win;
Win = Windows.NextWnd(Win);
}
while (Win)
}
if (NeedWin) {
Windows.ActiveWnd = NeedWin;
}
else {
ShowHtml(BinDir+"SubS3.htm","SubS3");
}
}
var LastWin;
// " *" ""
function ShowKOnfigWnd()
{
var Win = Windows.FirstWnd;
NeedWin = "";
if (Win) {
do
{
if (Win.caption == "") NeedWin = Win;
if (Win.caption == " *") NeedWin = Win;
Win = Windows.NextWnd(Win);
}
while (Win)
}
if (NeedWin) {
Windows.ActiveWnd = NeedWin;
}
}
"" , js :( |
141 - 21.12.2004 - 12:09 |
2(139) ! :)
int CEditDoc::DialogToScreen(int,int);
void CEditDoc::DialogToScreen(class CPoint &);
void CEditDoc::DialogToScreen(class CRect &);
int CEditDoc::ScreenToDialog(int,int);
void CEditDoc::ScreenToDialog(class CPoint &);
void CEditDoc::ScreenToDialog(class CRect &); |
a13x
142 - 21.12.2004 - 12:14 |
(141) ? |
143 - 21.12.2004 - 12:16 |
2(142) IDA - :) |
SiMazx
144 - 21.12.2004 - 12:17 |
, ... LOL... |
a13x
145 - 21.12.2004 - 12:21 |
(143) -
, - , " " () -
, , , |
artbear
146 - 21.12.2004 - 12:40 |
"" .
:
. trdm
aka artbear
aka ADirks
========================================
3 ;
1) / - GoUp, GoDown
2) - GoUp2, GoDown2
3) / . ,
/ , . GoUp3, GoDown3
:
<s1> ()
<s2> ...
.....
<s3> ...
<s4>;
<s5> ...
......
...<p1>...
<s6>;
.....
<p2>
1) <p1> <s6>, <s5>, <s4>, <s3>, <s2>, <s1>
2) <p1> <s5>, <s3>, <s2>, <s1>
3) <p1> <s2>, <s1>.
<p1> <s5>, <s2>, <s1>
---------------------------------------------------------------------
http://1c.proclub.ru/modules/mydownloads/personal.php?cid=1001&lid=4507 |
trdm
147 - 21.12.2004 - 14:04 |
(146) :). |
148 - 21.12.2004 - 15:30 |
, ...
OpenConf.CommonServices
jumper
|
a13x
149 - 21.12.2004 - 15:36 |
(148) , , CommonServices.wsc
(regsvr32 CommonServices.wsc) |
150 - 21.12.2004 - 15:38 |
, . . |
151 - 21.12.2004 - 15:45 |
, CommonServices.wsc, . : , ? . |
artbear
152 - 21.12.2004 - 16:49 |
(ALL) "" .
[+] .
:
COM- CommonServices.wsc :
regsvr32 CommonServices.wsc |
artbear
153 - 21.12.2004 - 16:51 |
(151+) "" GoUp GoDown Ctrl+[ Ctrl+]
.
:) |
leshik
154 - 21.12.2004 - 17:27 |
Intellisence
1719
// , .. |
trdm
155 - 21.12.2004 - 18:16 |
(153) , ? :) |
IAm
156 - 21.12.2004 - 19:50 |
154 ? ? |
fez
157 - 21.12.2004 - 20:15 |
(156) , - . intellisence - . |
leshik
158 - 21.12.2004 - 21:56 |
(156)
Intellisence.vbs ver. 1.1.5
|
iled
159 - 22.12.2004 - 00:59 |
-
:))) |
RVV
160 - 22.12.2004 - 01:00 |
:(
?
PS
- p
OC - 1018 |
DeAmon2K
161 - 22.12.2004 - 07:57 |
!! , - , . , . (title ) - - 1 , , 1, ... 1 , .... ... , 8-(
... 24 - windows xp |
DeAmon2K
162 - 22.12.2004 - 08:05 |
, . ...
( ) , ? |
orefkov
163 - 22.12.2004 - 08:31 |
(160,161)
. |
DeAmon2K
164 - 22.12.2004 - 09:20 |
---
;
= ("");
---
, , . - () ... 8-)
. - .. ( ) ... 1 , ... 1 . , . |
artbear
165 - 22.12.2004 - 09:26 |
(ALL) : .
, :)
----------------------------------------------------------------
v2.0.0.0p
-
- " "
- . "" - .
, ""
. .
, .
- Ctrl+Shift+1.
SendCommand 22511
-
- XP W2K3
----------------------------------------------------------------
http://openconf.itland.ru/beta/telepatp.zip |
a13x
166 - 22.12.2004 - 09:51 |
!
.
(artbear)
OpenConf,
1 .
.
http://groups-beta.google.com/group/OpenConf-Devel
.
; ( Join This Group - ).
.
(, ), , , - .
.
:
orefkov, artbear, ADirks, IAm, trdm,
, - .
.
- !
. |
AlTone
167 - 22.12.2004 - 12:43 |
- .()
.. .
v2.0.0.0p |
trdm
168 - 22.12.2004 - 13:13 |
?
, readme.txt,history.txt .txt .
:) , Intellisence-readme.txt.
, , readme.txt :(.
Config ..... |
a13x
169 - 22.12.2004 - 14:03 |
(168)
,
,
. ,
, , ,
,
:
.
1. "plug-n-play" :-)
, Bin, :
- Config\scripts ( )
com-dll Config\dll
wsc - Config\wsc
/ - Config\docs
,
, -,
,
.
2.
,
,
ChangeLog
.
..
,
, |
170 - 22.12.2004 - 14:26 |
, , "", . . - ...
.
, 24 SQL, 1.0.1.7
.
"!" |
171 - 22.12.2004 - 15:09 |
+170 :) - ? ???
.
:) !!! ;) |
172 - 22.12.2004 - 15:11 |
(170) 1.0.1.8, |
a13x
173 - 22.12.2004 - 15:12 |
(171)
,
HKEY_CURRENT_USER\Software\1C\1Cv7\7.7\_\Config\ToolbarSystem
.
, p , , |
174 - 22.12.2004 - 15:23 |
.
1.0.1.8 ?
.
"" ? |
a13x
175 - 22.12.2004 - 15:35 |
(172) 1.0.1.7 |
artbear
176 - 22.12.2004 - 15:35 |
(174) 1.0.1.8
. |
177 - 22.12.2004 - 16:03 |
. ? |
orefkov
178 - 22.12.2004 - 17:15 |
(177) - (18,22,165) |
Matic
179 - 22.12.2004 - 17:50 |
(178)
1018 2000 ( 22/12/04) WinXP SP1 1c23dbf. HKEY_CURRENT_USER\Software\1C\1Cv7\7.7\< >\Config\ToolbarSystem
.
Ctrl+1 . . Ctrl+Shift+1 . |
IAm
180 - 22.12.2004 - 23:32 |
161,162,164
- , - . |
MetaEditor
181 - 23.12.2004 - 09:34 |
Shift+F3 ...
Mode=3...
...
... ... ;-)
Set CommonScripts = Scripts("common")
LastMode=1
Sub ToggleCase
set doc = CommonScripts.GetTextDoc(0)
SelText=Trim(doc.range(doc.SelStartLine,doc.SelStartCol, doc.SelEndLine, doc.SelEndCol))
Mode=LastMode+1
If Mode > 3 Then Mode = 1
If Mode=1 Then
Doc.range(doc.SelStartLine,doc.SelStartCol, doc.SelEndLine, doc.SelEndCol)=LCase(SelText)
LastMode=1
ElseIf Mode=2 Then
doc.range(doc.SelStartLine,doc.SelStartCol, doc.SelEndLine, doc.SelEndCol)=UCase(SelText)
LastMode=2
ElseIf Mode=3 Then
ProperCase = UCase(Left(SelText,1)) & LCase(Right(SelText,Len(SelText)-1))
doc.range(doc.SelStartLine,doc.SelStartCol, doc.SelEndLine, doc.SelEndCol) = ProperCase
LastMode=3
End If
End Sub |
trdm
182 - 23.12.2004 - 16:49 |
? :) :) |
183 - 23.12.2004 - 17:29 |
(181) , Shift+F3 ...
********
- ? |
trdm
184 - 23.12.2004 - 21:29 |
+(169) :
Config\scripts - ( )
Config\dll - com-dll
Config\docs - / - Config\docs
Config\ini - .....
Config\wsc - wsc ( com-dll) ....
......
|
185 - 27.12.2004 - 15:25 |
Up |
Phoenix
186 - 27.12.2004 - 15:37 |
, :
: ADirks & artbear
'----------------------------------------------------------------
' : (Phoenix)
' Email: PhoenixUSA#yandex(dot)ru
'
'
'
'
'
Set srv=CreateObject("Svcsvc.Service")
Set RE = New RegExp
'----------------------------------------------------------------
sub GoFindText(DoBookmark)
Dim strDoc, fStr
If Windows.ActiveWnd Is Nothing Then
MsgBox " "
Exit Sub
End If
Set doc = Windows.ActiveWnd.Document
If doc=docWorkBook Then Set doc=doc.Page(1)
If doc<>docText Then
MsgBox " "
Exit Sub
End If
vDefaultWord = doc.CurrentWord
vals = ""
fStr = InputBox(" ", " ", vDefaultWord)
if fStr <> "" then
RE.Pattern = fStr
RE.IgnoreCase = true
if DoBookmark = 1 then
if MsgBox(" ?",vbYesNo,"") = vbYes then
doc.ClearAllBookMark
end if
end if
For i = 0 To doc.LineCount - 1
strDoc = Trim (doc.Range (i, 0))
if strDoc <> "" then
Set Matches = RE.Execute(strDoc)
If Matches.Count > 0 Then
Message("(" + CStr(i+1) + ") " + strDoc)
vals = vals & vbCrLf & "(" & CStr(i+1) & ") " & Replace(strDoc,vbTab,"")
if DoBookmark = 1 then
doc.Bookmark(i) = true
end if
End If
End If
Next
fStr = srv.FilterValue(Vals,1)
if fStr <> "" then
strDoc = Mid( fStr, InStr(fStr, "(")+1 , InStr(fStr, ")")-2)
doc.MoveCaret CInt(strDoc)-1,0
end if
end if
End sub
'----------------------------------------------------------------
sub FindWithAddBookmarks()
GoFindText(1)
end sub
'----------------------------------------------------------------
sub FindWithoutAddBookmarks()
GoFindText(0)
end sub |
artbear
187 - 28.12.2004 - 13:33 |
?
:) |
trdm
188 - 28.12.2004 - 14:47 |
:(
:( |
trdm
189 - 28.12.2004 - 15:09 |
IAm orefkov .
1. +"_"+ .
. FormEx.... ...
.... :) |
IAm
190 - 28.12.2004 - 15:12 |
(189) , , . |
trdm
191 - 28.12.2004 - 15:30 |
:(
? *.ints...
...
+"_"+ IDDoka_IDRekv.ints .
, . FilterValue...
, , , , .. .. .... |
IAm
192 - 28.12.2004 - 15:32 |
19 , ! |
trdm
193 - 28.12.2004 - 15:34 |
(:)
" ."
" . "
" ( )"
... |
trdm
194 - 28.12.2004 - 15:53 |
, , ....
;) |
slavka
195 - 29.12.2004 - 07:59 |
!!!
() , .. 5 ? |
MetaEditor
196 - 29.12.2004 - 08:12 |
ReDim MyArray(10), |
slavka
197 - 29.12.2004 - 08:31 |
. - 1 2 ... .. - - |
artbear
198 - 29.12.2004 - 09:14 |
(191, 194) , - !
, (193).
- :) |
trdm
199 - 29.12.2004 - 10:11 |
(198) , , .
- .
IAma *.ints
: , , , , svcsvc.dll , "..." ...
, ..
....
: , ...
- ,
, , , , Esc... ....
:) V8 :)
, ...
, , .. |
trdm
200 - 29.12.2004 - 10:15 |
(197) 196- "" . "ReDim" ....
(+199) :) |
trdm
201 - 29.12.2004 - 11:58 |
1cv7 , . , , :) |
Gr
202 - 29.12.2004 - 12:47 |
(201) , telepatp |
artbear
203 - 29.12.2004 - 14:30 |
(201,202) 2000 , ? 1008 ?
.. .
- .
. |
trdm
204 - 31.12.2004 - 09:08 |
(203) "o" , - Messagov, 1.0.1.7
.
"", ... |
trdm
205 - 31.12.2004 - 09:16 |
js ?
vbs "Stop"... |
orefkov
206 - 31.12.2004 - 12:08 |
debug ? |
trdm
207 - 31.12.2004 - 12:27 |
..
" .
....
: "debug" - " |
IAm
208 - 31.12.2004 - 12:33 |
! :)) |
orefkov
209 - 31.12.2004 - 12:48 |
debugger? |
IAm
210 - 31.12.2004 - 12:51 |
! |
orefkov
211 - 31.12.2004 - 12:55 |
!!! |
IAm
212 - 31.12.2004 - 13:02 |
, - , , - , . ! |
vS
213 - 01.01.2005 - 19:54 |
!!!
-... , ...
23 24 , SQL DBF XP eng SP2
openconf 1.0.1.7 telepat o
;) , :
.... () , bkend.dll ... |
trdm
214 - 02.01.2005 - 16:10 |
All ....
(209) :(
:
Sub TestCD()
set CD = CreateObject("MSComDlg.CommonDialog")
CD.ShowColor()
MsgBox CD.Color
End Sub
.....
(, )
= ""
= 0;
CD = CreateObject("MSComDlg.CommonDialog");
CD.Color = ;
CD.ShowColor();
= CD.Color;
;
= CD.Color;
{D:\DATABASE\\\EXTFORMS\ .ERT(73)}:
? |
trdm
215 - 02.01.2005 - 17:03 |
....
, .....
**************ChoiceColor.wsc********************
<?xml version="1.0" encoding="windows-1251" ?>
<component>
<?component error="true" debug="true"?>
<registration
description="ChoiceColor"
progid="ChoiceColor.1C"
version="1.00"
classid="{22B3ADF5-0A5E-4527-A4A3-A7CCBA0BF6D2}"
>
</registration>
<public>
<method name="ChoiceC" dispid = "1">
<PARAMETER name="nVal"/>
</method>
</public>
<script language="VBScript">
*************************************************
, ....
CD = CreateObject("ChoiceColor.1C");
= CD.ChoiceC(); |
trdm
216 - 02.01.2005 - 17:06 |
**************************************************
<?xml version="1.0" encoding="windows-1251" ?>
<component>
<?component error="true" debug="true"?>
<registration
description="ChoiceColor"
progid="ChoiceColor.1C"
version="1.00"
classid="{22B3ADF5-0A5E-4527-A4A3-A7CCBA0BF6D2}"
>
</registration>
<public>
<method name="ChoiceC" dispid = "1">
<PARAMETER name="nVal"/>
</method>
</public>
<script language="VBScript">
**************************************************
2- .... |
trdm
217 - 02.01.2005 - 17:08 |
.... |
trdm
218 - 03.01.2005 - 14:26 |
(211) , , ...
....
, .....
(//)....
, ?
(// ..) , :(......
, , ? |
219 - 03.01.2005 - 18:59 |
! , - ( ), -: - : dynwrap.dll, ! CommonServices.wsc .... , SP2, 24 sql, -? - , ? , GPRS, . |
trdm
220 - 03.01.2005 - 19:21 |
(219) -?
.... |
orefkov
221 - 04.01.2005 - 00:01 |
(218) , .
,
. |
trdm
222 - 04.01.2005 - 11:31 |
- , ... |
223 - 04.01.2005 - 14:19 |
220) : LoadLibrari("dynwrap.dll") ! --regsvr32 dynwrap.dll |
slavka
224 - 04.01.2005 - 15:31 |
dynwrap.dll |
trdm
225 - 04.01.2005 - 17:10 |
+(224) , ... |
MetaEditor
226 - 04.01.2005 - 17:37 |
, ...
%windir%...(c:\windows)
regsvr32 dynwrap.dll |
227 - 04.01.2005 - 21:50 |
! ! 226 - ! |
228 - 04.01.2005 - 21:55 |
224)+225) - . E:\Program Files\1Cv77\ . |
229 - 05.01.2005 - 09:21 |
? :
(..)
;
, , :
- prop
- prop
, ? |
slavka
230 - 05.01.2005 - 09:27 |
telepat.vbs. - / |
orefkov
231 - 05.01.2005 - 11:07 |
(229) . .
. -.
. |
1
232 - 05.01.2005 - 11:15 |
(231) , . - () ?
. |
orefkov
233 - 05.01.2005 - 12:13 |
http://openconf.itland.ru/beta
.
(232)
. |
sashat
234 - 05.01.2005 - 12:18 |
?
.
? |
MetaEditor
235 - 05.01.2005 - 12:35 |
234) ... ;)
: qrstuvwxyz |
Matic
236 - 05.01.2005 - 13:33 |
(233) , p q .
. 1.0.0.8.
ctrl-1 . MS.
, . . |
orefkov
237 - 05.01.2005 - 15:32 |
(236)
DrWatson?
? |
trdm
238 - 06.01.2005 - 03:59 |
. :(
// ***************** .js *********************
// ***************************************************
function () { SendCommand(32844) } //
function () { SendCommand(33263) } //
function () { SendCommand(32854) } // ()
function () { SendCommand(33207) } //
function () { SendCommand(33206) } // \n
// /
function () { SendCommand(33201) } // ( )
function () { SendCommand(33202) } // ( )
// ***************************************************
function () { SendCommand(32936) } //
// ->
function () { SendCommand(33071) } //
function () { SendCommand(33070) } //
function () { SendCommand(33068) } //
function () { SendCommand(33069) } //
// ->
function () { SendCommand(33077) } //
function () { SendCommand(33076) } //
function () { SendCommand(33078) } //
// ->
function () { SendCommand(33074) } //
function () { SendCommand(33075) } //
// ->
function () { SendCommand(33117) } //
function () { SendCommand(33115) } //
function () { SendCommand(33060) } //
function () { SendCommand(33061) } //
function () { SendCommand(33062) } //
function () { SendCommand(33065) } //
function () { SendCommand(33066) } //
function () { SendCommand(32928) } //
function () { SendCommand(32933) } //
function () { SendCommand(32937) } //
// ***************************************************
function () { SendCommand(33196) } //
function () { SendCommand(33711) } //
// ***************************************************
function () { SendCommand(33333) } //
function () { SendCommand(33334) } //
function () { SendCommand(33318) } ///
function () { SendCommand(33330) } //
function () { SendCommand(33331) } // |
trdm
239 - 06.01.2005 - 04:03 |
:( |
trdm
240 - 06.01.2005 - 04:21 |
ctrl+alt+[f|b] ctrl+[P-Up|P-Down], ? |
orefkov
241 - 06.01.2005 - 08:43 |
Ctrl+Alt+F = 32857
Ctrl+Alt+B = 32858 |
Matic
242 - 06.01.2005 - 09:35 |
(237) DrWatson? ?
(ctrl-1 )
.
AppName: 1cv7.exe AppVer: 7.70.0.23 ModName: mfc42.dll
ModVer: 6.0.8665.0 Offset: 000049fc |
orefkov
243 - 06.01.2005 - 09:46 |
(242)
SYSTEM32 drwtsn32.exe .
"".
. |
Matic
244 - 06.01.2005 - 10:11 |
(243) ? |
Matic
245 - 06.01.2005 - 10:36 |
(243) |
MetaEditor
246 - 06.01.2005 - 11:24 |
238) ... ... |
trdm
247 - 06.01.2005 - 23:36 |
(241) , - ... (
, FormEx svcsvc (FilterValue)?
, ,
, ... ....
? , . |
vS
248 - 07.01.2005 - 16:30 |
(233) 10ks, :) |
vS
249 - 09.01.2005 - 21:09 |
(238) ?
, , ... , :) |
trdm
250 - 09.01.2005 - 21:16 |
http://1c.proclub.ru/modules/mydownloads/personal.php?cid=5&lid=4599
FilterValue + FormEx 1
, .......
(249) :( ... |
vS
251 - 10.01.2005 - 06:51 |
? , ...
, ...
(238) ?? |
