A HotDocument A HotDocument A HotDocument A HotDocument A HotDocument A HotDocument A HotDocument A HotDocument
@(h) Select.vb ver 1.1 ( 07.09.15 ) @(h) Select.vb ver 1.0 ( 07.09.13 ) @(s) Option Explicit Private Structure SYMBOLINFO Dim SyDataType As String Dim SyDataTypeDef As String End Structure As Private Type TYPE_SYMBOLINFO Dim TpSyDataType As String As Dim TpSyDataTypeDef As String End Type Public Interface IInfoBlock Property Selected() As Boolean Sub UpdateDataSet() End Interface Declare Function ExitWindow Lib "USER" () As Integer Windows Public Delegate Sub FractalDoneCallback() Public Event ClickFileMenu(ByVal sender As Object, _ ByVal Index As Integer) Public gsymboldata As SYMBOLINFO Public Const APPNAME = "HotDoc" Public Const LOGDIR = "C:LOG" Public gselectappno As Integer Public gtmpdir As String Private Const FRMTITLE = "Select" Private Const FRMNO = 1 Private mselectmouduleno As Integer Private minfilename As String Namespace OpenNewDatas Public Class AddInNewMenu Implements Extensibility.IDTExtensibility2 Const MEMBERMAX = 256 Const ARGSMAX = 256 End Class End Namespace Public Enum WeekDay Sun = 1 Mon = 2 Tue = 3 Wed = 4 Thu = 5 Fri = 6 Sat = 7 End Enum
: : : ARG1 - ARG2 - : : 80 Private Function GetMsg(FileNum As Integer, Index As Index) As String OpenMsgFile(FileNum) If (FileNum < 0) Then End If @(h) Select.vb ver 1.1 ( 07.09.15 ) @(h) Select.vb ver 1.0 ( 07.09.13 ) @(s) ZZDebug_Print() GetMsg = ReadMsgFile(FileNum, Index) CloseMsgFile(FileNum) End Function
Private Structure SYMBOLINFO Dim SyDataType As String Dim SyDataTypeDef As String End Structure As Private Type TYPE_SYMBOLINFO Dim TpSyDataType As String As Dim TpSyDataTypeDef As String End Type Public Enum WeekDay Sun = 1 Mon = 2 Tue = 3 Wed = 4 Thu = 5 Fri = 6 Sat = 7 End Enum Public Interface IInfoBlock Property Selected() As Boolean Sub UpdateDataSet() End Interface Public Const APPNAME = "HotDoc" Public Const LOGDIR = "C: LOG" Private Const FRMTITLE = "Select" Private Const FRMNO = 1 A HotDocument Public gselectappno As Integer Public gtmpdir As String Private mselectmouduleno As Integer Private minfilename As String
Declare Function ExitWindow Lib "USER" () As Integer Windows Public Delegate Sub FractalDoneCallback() Public Event ClickFileMenu(ByVal sender As Object, _ ByVal Index As Integer) Namespace OpenNewDatas Public Class AddInNewMenu Implements Extensibility.IDTExtensibility2 : : : ARG1 - ARG2 - : : 80 A HotDocument"@(f)" Const MEMBERMAX = 256 Const ARGSMAX = 256 End Class End Namespace @(e) : A HotDocument A HotDocument
A HotDocument : : : ARG1 - : 20070915 : : : A HotDocument OpenMsgFile(FileNum) If (FileNum < 0) Then End If ZZDebug_Print() @(h) Comment.cpp ver 2.0 ( 07.09.13 ) @(h) Comment.cpp ver 1.0 ( 07.09.01 ) @(s) I/O #define HC_MAX_PATH128 #define HC_MAX_EXT3 #define HC_MAX_FILENAME128 #define HC_MAX_DATE9 "YY/MM/DD" #define NUMBER_OF(a) ( sizeof(a) / sizeof(a[0]) ) typedef struct Memory char *s; struct Memory *next; MEMORY; union u_tag int ival; float fval; char *sval; u; GetMsg = ReadMsgFile(FileNum, Index) CloseMsgFile(FileNum)
enum Boolean False, True ; class Box private: int height; int width; int depth; public: Box(int,int,int); int volume(void); int surface(void); ; : : [byte]( 0) : : pstrinstr( "a#c#d#eeee", "#" ) -> 2 pstrinstr( "a#c#d##eeee", "##" ) -> 6 pstrinstr( "abcdeabcde", "AA" ) -> 0 int pstrinstr(const char *tarstr, const char *srcstr) int nsrc = strlen(srcstr); int ntar = strlen(tarstr); int i; / for (i = 0; i < ntar; i++) if (strncmp(tarstr+i, srcstr, nsrc) == 0) return i+1; return 0; @(h) Comment.cpp ver 2.0 ( 07.09.13 ) @(h) Comment.cpp ver 1.0 ( 07.09.01 ) @(s) I/O typedef struct Memory char *s; struct Memory *next; MEMORY; union u_tag int ival; float fval; char *sval; u; enum Boolean False, True ;
#define HC_MAX_FILENAME128 #define NUMBER_OF(a) ( sizeof(a) / sizeof(a[0]) ) class Box private: int height; int width; int depth; public: Box(int,int,int); int volume(void); int surface(void); ; : : [byte]( 0) : : pstrinstr( "a#c#d#eeee", "#" ) -> 2 pstrinstr( "a#c#d##eeee", "##" ) -> 6 pstrinstr( "abcdeabcde", "AA" ) -> 0 char *cm_getmessage( char *msg_filename, int msg_number) int i; char *cm_getmessage(msg_filename, msg_number) char *msg_filename; int msg_number; int i; A HotDocument : : [byte]( 0) : : 2007928 : : pstrinstr( "a#c#d#eeee", "#" ) -> 2 pstrinstr( "a#c#d##eeee", "##" ) -> 6 pstrinstr( "abcdeabcde", "AA" ) -> 0 :
A HotDocument/ / int nsrc = strlen(srcstr); int ntar = strlen(tarstr); int i; / for (i = 0; i < ntar; i++) if (strncmp(tarstr+i, srcstr, nsrc) == 0) return i+1; return 0; /* */ *c */ /*t */ t /* @(h) Comment.c ver 2.0 ( 07.09.13 ) */ /* @(h) Comment.c ver 1.0 ( 07.09.01 ) */ /* @(s) * I/O * * */ #define HC_MAX_PATH128 /* */ #define HC_MAX_EXT3 /* */ #define HC_MAX_FILENAME128 /* */ #define HC_MAX_DATE9 /* "YY/MM/DD" */ #define NUMBER_OF(a) ( sizeof(a) / sizeof(a[0]) )/* */ typedef struct Memory /* */ char *s; /* */ struct Memory *next; /* */ MEMORY; union u_tag /* */ int ival; /* */ float fval; /* */ char *sval; /* */ u; enum Boolean /* */ False, /* */ True /* */ ;
/* * : * * : [byte]( 0) * * : * * : pstrinstr( "a#c#d#eeee", "#" ) -> 2 * pstrinstr( "a#c#d##eeee", "##" ) -> 6 * pstrinstr( "abcdeabcde", "AA" ) -> 0 */ int pstrinstr(tarstr, srcstr) const char *tarstr; /* */ const char *srcstr; /* */ int nsrc = strlen(srcstr); int ntar = strlen(tarstr); int i; /*c */ for (i = 0; i < ntar; i++) /*t */ if (strncmp(tarstr+i, srcstr, nsrc) == 0) return (i+1); /*tt */ return (0); @(h) Form1.cs ver 1.0 ( 07.09.15 ) @(h) Form1.cs ver 1.1 ( 07.09.20 ) @(s) Form1 using System; using System.Drawing; using System.Collections; using System.ComponentModel; using System.Windows.Forms; using System.Data;
namespace Sample Form1 / <summary> / Form1 / / / </summary> public class Form1 : System.Windows.Forms.Form public const int LOOP_COUNT = 2; public static int nsize = 10; public interface InterSample interface event MyDelegate MyEvent1; MyEvent1 event MyDelegate MyEvent2; MyEvent2 public struct PERSON struct string Name; int Age; public enum WeekDay Sun = 1, Mon = 2, Tue = 3, Wed = 4, Thu = 5, Fri = 6, Sat = 7, enum : : LOOP_COUNT : ARG1 - ARG2 - : : private void button1_click (Object sender, System.EventArgs e) int i; String Buf; / Buf = ""; / for (i = 0; i < LOOP_COUNT; i++) String MessageString; MessageString = i + Buf; MessageBox.Show(MessageString); public delegate void MyDelegate(int i); delegate public event MyDelegate MyEvent1; event public event MyDelegate Event2 event add [DllImport("user32.dll", EntryPoint="GetDC")] extern private static IntPtr GetDC(IntPtr hdc); DllImport
@(h) Form1.cs ver 1.0 ( 07.09.15 ) @(h) Form1.cs ver 1.1 ( 07.09.20 ) @(s) Form1 / <summary> / Form1 / / / </summary> public class Form1 : System.Windows.Forms.Form : : LOOP_COUNT : ARG1 - ARG2 - : : public const int LOOP_COUNT = 2; public static int nsize = 10;
namespace Sample Form1 public interface InterSample interface event MyDelegate MyEvent1; MyEvent1 event MyDelegate MyEvent2; MyEvent2 public struct PERSON struct string Name; int Age; public enum WeekDay enum Sun = 1, Mon = 2, Tue = 3, Wed = 4, Thu = 5, Fri = 6, Sat = 7, public delegate void MyDelegate(int i); delegate public event MyDelegate MyEvent1; event public event MyDelegate Event2 event add [DllImport("user32.dll", EntryPoint="GetDC")] extern private static IntPtr GetDC(IntPtr hdc); DllImport
summary param A HotDocumentHC / <summary> /XML / / </summary> / <remarks> / / </remarks> / <param name="coumment"></param> / <param name="size"></param> / <returns> / / </returns> / <exception> / / </exception> private void WebPageBuildComment(string Coumment, int Size) / <summary> / / </summary> public const int LOOP_COUNT = 2; / <summary> / / </summary> public static int nsize = 10; / <summary> / interface / </summary> public interface InterSample event MyDelegate MyEvent1; MyEvent1 event MyDelegate MyEvent2; MyEvent2 / <summary> / struct / </summary> public struct PERSON string Name; int Age; / <summary> / enum / </summary> public enum WeekDay Sun = 1, Mon = 2, Tue = 3, Wed = 4, Thu = 5, Fri = 6, Sat = 7, / <summary> / delegate / </summary> public delegate void MyDelegate(int i);
A HotDocument : : [byte]( 0) : : 20070915 : : pstrinstr( "a#c#d#eeee", "#" ) -> 2 pstrinstr( "a#c#d##eeee", "##" ) -> 6 pstrinstr( "abcdeabcde", "AA" ) -> 0 : /<summary> /XML / /</summary> /<newtag> / /</newtag> /<value> / /</value> /<returns> / /</returns> A HotDocument/ / int i; String Buf; / Buf = ""; / LOOP_COUNT for (i = 0; i < LOOP_COUNT; i++) String MessageString; MessageString = i + Buf; MessageBox.Show(MessageString);
@(h) Form1.java ver 1.0 ( 07.09.15 ) @(h) Form1.java ver 1.1 ( 07.09.20 ) @(s) Form1 package Sample; import System.Drawing.*; import System.Collections.*; import System.ComponentModel.*; import System.Windows.Forms.*; import System.Data.*; public class Form1 extends System.Windows.Forms.FormForm1 private System.Windows.Forms.Button button1; private System.ComponentModel.Container components = null; public static final int LOOP_COUNT = 2; public static int nsize = 0; : : LOOP_COUNT : : private void button1_click (Object sender, System.EventArgs e) int i; String Buf; / Buf = ""; / LOOP_COUNT for (i = 0; i < LOOP_COUNT; i++) String MessageString; MessageString = i + Buf; MessageBox.Show(MessageString); /** * JavaDoc * * * @param * @return * @author * @version * @since * @see * @exception * @deprecated */ private void JavaDoc() /
@(h) Form1.java ver 1.0 ( 07.09.15 ) @(h) Form1.java ver 1.1 ( 07.09.20 ) @(s) Form1 public class Form1 extends Form public class Class1 : : LOOP_COUNT : : private void button1_click (Object sender, System.EventArgs e)
B A HotDocumentHC /** * JavaDoc * * * @param * @return * @author * @version * @since * @see * @exception * @deprecated */ private void JavaDoc() / A HotDocument : : [byte]( 0) : : 20070915 : : pstrinstr( "a#c#d#eeee", "#" ) -> 2 pstrinstr( "a#c#d##eeee", "##" ) -> 6 pstrinstr( "abcdeabcde", "AA" ) -> 0 : /** * JavaDoc * * * @newkey * @returns * @attention */
A HotDocument/ / int i; String Buf; / Buf = ""; / LOOP_COUNT for (i = 0; i < LOOP_COUNT; i++) String MessageString; MessageString = i + Buf; MessageBox.Show(MessageString);