OSDN Git Service

コメントつけかえ。
authoryoffy <yoffy>
Sat, 9 Oct 2004 15:07:20 +0000 (15:07 +0000)
committeryoffy <yoffy>
Sat, 9 Oct 2004 15:07:20 +0000 (15:07 +0000)
Giko.pas
GikoXMLDoc.pas
Trip.pas

index 62ee9e6..613ed90 100644 (file)
--- a/Giko.pas
+++ b/Giko.pas
@@ -1183,11 +1183,11 @@ type
        TBrowserRecord = class( TObject )
        private
                FBrowser        : TWebBrowser;
-               FEvent: THTMLDocumentEventSink; //!\83u\83\89\83E\83U\83h\83L\83\85\83\81\83\93\83g\83C\83x\83\93\83g
+               FEvent: THTMLDocumentEventSink; ///\83u\83\89\83E\83U\83h\83L\83\85\83\81\83\93\83g\83C\83x\83\93\83g
                FThread         : TThreadItem;
                FLastSize       : Integer;
                FRepaint        : Boolean;
-               FMovement       : string;                                                       //!\83X\83N\83\8d\81[\83\8b\90æ\83A\83\93\83J\81[
+               FMovement       : string;                                                       ///\83X\83N\83\8d\81[\83\8b\90æ\83A\83\93\83J\81[
        public
                destructor      Destroy; override;
                property        Browser : TWebBrowser   read FBrowser   write FBrowser;
@@ -3048,12 +3048,12 @@ begin
        Result := FHttpState;
 end;
 
-{*!
+{!
 \brief         ListView \82Ì Column \82ð\90^\82Ì\83J\83\89\83\80\82É\95Ï\8a·
 
 Delphi 6 Personal \82Å\82Ì ListView \82Å\82Í ListViewColumnClick \83C\83x\83\93\83g\82Å
 \90³\82µ\82¢\83J\83\89\83\80\82ª\93n\82³\82ê\82È\82¢\82½\82ß\81A\90³\82µ\82¢\83J\83\89\83\80\82É\95Ï\8a·\82µ\82Ü\82·\81B
-*}
+}
 function       TGikoForm.ActiveListTrueColumn( column : TListColumn ) : TListColumn;
 {*
 var
index 06c82bf..7b35439 100644 (file)
@@ -1,8 +1,11 @@
 unit GikoXMLDoc;
 
-{
-       XMLIntf, XMLDoc \82 \82½\82è\82Ì\83N\83\8d\81[\83\93
-       Delphi 6 Personal \97p
+{!
+\file          GikoXMLDoc.pas
+\brief XMLIntf, XMLDoc \82 \82½\82è\82Ì\83N\83\8d\81[\83\93<br>
+                               Delphi 6 Personal \97p
+
+$Id: GikoXMLDoc.pas,v 1.10 2004/10/09 15:07:20 yoffy Exp $
 }
 interface
 
@@ -176,13 +179,13 @@ begin
 
 end;
 
-{*!
+{!
 \brief tok \82ð\92T\82·
 \param p                       \92T\8dõ\8aJ\8en\88Ê\92u
 \param tail    \8fI\97¹\88Ê\92u + 1
 \param tok             \92T\82·\83L\83\83\83\89\83N\83^
 \return        tok \82ª\8dÅ\8f\89\82É\8c©\82Â\82©\82Á\82½\88Ê\92u
-*}
+}
 function AnsiStrTok(
        p                       : PChar;
        const tail      : PChar;
@@ -205,13 +208,13 @@ begin
 
 end;
 
-{*!
+{!
 \brief tok \82Å\82Í\96³\82¢\83L\83\83\83\89\83N\83^\82ð\92T\82·
 \param p                       \92T\8dõ\8aJ\8en\88Ê\92u
 \param tail    \8fI\97¹\88Ê\92u + 1
 \param tok             \92T\82·\83L\83\83\83\89\83N\83^
 \return        tok \82Å\82Í\82È\82¢\83L\83\83\83\89\83N\83^\82ª\8dÅ\8f\89\82É\8c©\82Â\82©\82Á\82½\88Ê\92u
-*}
+}
 function AnsiStrNonTok(
        p                       : PChar;
        const tail      : PChar;
index 4251710..0c103f6 100644 (file)
--- a/Trip.pas
+++ b/Trip.pas
@@ -1,7 +1,8 @@
 unit Trip;
 
-{
-       \83g\83\8a\83b\83v\82Ì\90\90¬
+{!
+\file          Trip.pas
+\brief \83g\83\8a\83b\83v\82Ì\90\90¬
 
        http://ghanyan.monazilla.org/trip.html
        \82ð\8c³\82É\83M\83R\83i\83r\97p\82É\88Ú\90A\82³\82¹\82Ä\82¢\82½\82¾\82«\82Ü\82µ\82½\81B
@@ -23,10 +24,14 @@ type
                EP : ^CryptOrdering;
        end;
 
-// \83g\83\8a\83b\83v\82Ì\90\90¬
+{!
+\brief \83g\83\8a\83b\83v\82Ì\90\90¬
+\param pw      \8c³\82É\82È\82é\83p\83X\83\8f\81[\83h
+\return                        \90\90¬\82³\82ê\82½\83g\83\8a\83b\83v
+}
 function get_2ch_trip(
-       const pw : PChar        // \8c³\82É\82È\82é\83p\83X\83\8f\81[\83h
-) : string;                                    // \90\90¬\82³\82ê\82½\83g\83\8a\83b\83v
+       const pw : PChar
+) : string;
 
 const
        kCryptInitialTr : CryptOrdering = ( o_data: (