diff options
| author | Alexey Kulakov <panda75@bk.ru> | 2014-12-31 17:08:47 +0000 |
|---|---|---|
| committer | Alexey Kulakov <panda75@bk.ru> | 2014-12-31 17:08:47 +0000 |
| commit | da87b3fa0479333cfe9505713f6ffaa54b9ba543 (patch) | |
| tree | d4868e4947c3944bb3313a057ec3b189a876018f /plugins/Utils.pas/rtfutils.pas | |
| parent | f33f9ebac9806cba6bfd89715566a65c29b5fee2 (diff) | |
pascal code: reformat, small fixes
git-svn-id: http://svn.miranda-ng.org/main/trunk@11700 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Utils.pas/rtfutils.pas')
| -rw-r--r-- | plugins/Utils.pas/rtfutils.pas | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/plugins/Utils.pas/rtfutils.pas b/plugins/Utils.pas/rtfutils.pas index 905c98ef0e..9f545fc865 100644 --- a/plugins/Utils.pas/rtfutils.pas +++ b/plugins/Utils.pas/rtfutils.pas @@ -7,7 +7,7 @@ uses windows;
-function IsRTF(const Value: pWideChar): Boolean;
+function IsRTF(const Value: PWideChar): Boolean;
//used for Export only
function GetRichRTFW(RichEditHandle: THANDLE; var RTFStream: PWideChar;
@@ -32,14 +32,14 @@ procedure ReplaceCharFormat(RichEditHandle: THANDLE; const fromCF, toCF: CHARFOR function GetTextLength(RichEditHandle:THANDLE): Integer;
function GetTextRange (RichEditHandle:THANDLE; cpMin,cpMax: Integer): PWideChar;
-function BitmapToRTF(pict: HBITMAP): pAnsiChar;
+function BitmapToRTF(pict: HBITMAP): PAnsiChar;
implementation
uses
common;
-function IsRTF(const Value: pWideChar): Boolean;
+function IsRTF(const Value: PWideChar): Boolean;
const
RTF_BEGIN_1 = '{\RTF';
RTF_BEGIN_2 = '{URTF';
@@ -541,12 +541,12 @@ const HexDigitChr: array [0..15] of AnsiChar = ('0','1','2','3','4','5','6','7',
'8','9','A','B','C','D','E','F');
-function BitmapToRTF(pict: HBITMAP): pAnsiChar;
+function BitmapToRTF(pict: HBITMAP): PAnsiChar;
const
prefix = '{\rtf1 {\pict\dibitmap ';
postfix = ' }}';
var
- tmp, bi, bb, rtf: pAnsiChar;
+ tmp, bi, bb, rtf: PAnsiChar;
bis, bbs: cardinal;
len,cnt: integer;
begin
|