Home
last modified time | relevance | path

Searched refs:AStr (Results 51 – 75 of 478) sorted by relevance

12345678910>>...20

/dports/editors/lazarus/lazarus/components/fpdebug/app/fpdserver/
H A Ddebugtcpserver.pas79 function STrToStr(AStr: string): string; in STrToStr()
83 for i := 1 to length(AStr) do
84 if ord(AStr[i])<20 then
85 result := result +'#'+inttostr(ord(AStr[i]))
92 procedure WriteString(AStr: string);
96 AStr := AStr + #10;
97 i := FData.Write(AStr[1], length(AStr));
109 else if i < length(AStr) then
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/fpdebug/app/fpdserver/
H A Ddebugtcpserver.pas79 function STrToStr(AStr: string): string; in STrToStr()
83 for i := 1 to length(AStr) do
84 if ord(AStr[i])<20 then
85 result := result +'#'+inttostr(ord(AStr[i]))
92 procedure WriteString(AStr: string);
96 AStr := AStr + #10;
97 i := FData.Write(AStr[1], length(AStr));
109 else if i < length(AStr) then
/dports/editors/lazarus-qt5/lazarus/components/fpdebug/app/fpdserver/
H A Ddebugtcpserver.pas79 function STrToStr(AStr: string): string; in STrToStr()
83 for i := 1 to length(AStr) do
84 if ord(AStr[i])<20 then
85 result := result +'#'+inttostr(ord(AStr[i]))
92 procedure WriteString(AStr: string);
96 AStr := AStr + #10;
97 i := FData.Write(AStr[1], length(AStr));
109 else if i < length(AStr) then
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/fpdebug/app/fpdserver/
H A Ddebugtcpserver.pas79 function STrToStr(AStr: string): string; in STrToStr()
83 for i := 1 to length(AStr) do
84 if ord(AStr[i])<20 then
85 result := result +'#'+inttostr(ord(AStr[i]))
92 procedure WriteString(AStr: string);
96 AStr := AStr + #10;
97 i := FData.Write(AStr[1], length(AStr));
109 else if i < length(AStr) then
/dports/editors/lazarus/lazarus/components/lclextensions/tests/settimer/
H A DUnit1.pas154 AStr: String;
157 Timer1: AStr:='Timer1 called';
158 Timer2: AStr:='Timer2 called';
159 Timer3: AStr:='Timer3 called';
161 AStr:='TimerID not identified: '+IntToStr(Message.TimerID);
163 ListBox1.Items.Add('WMTimer - '+AStr);
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/lclextensions/tests/settimer/
H A DUnit1.pas154 AStr: String;
157 Timer1: AStr:='Timer1 called';
158 Timer2: AStr:='Timer2 called';
159 Timer3: AStr:='Timer3 called';
161 AStr:='TimerID not identified: '+IntToStr(Message.TimerID);
163 ListBox1.Items.Add('WMTimer - '+AStr);
/dports/editors/lazarus-qt5/lazarus/components/lclextensions/tests/settimer/
H A DUnit1.pas154 AStr: String;
157 Timer1: AStr:='Timer1 called';
158 Timer2: AStr:='Timer2 called';
159 Timer3: AStr:='Timer3 called';
161 AStr:='TimerID not identified: '+IntToStr(Message.TimerID);
163 ListBox1.Items.Add('WMTimer - '+AStr);
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/lclextensions/tests/settimer/
H A DUnit1.pas154 AStr: String;
157 Timer1: AStr:='Timer1 called';
158 Timer2: AStr:='Timer2 called';
159 Timer3: AStr:='Timer3 called';
161 AStr:='TimerID not identified: '+IntToStr(Message.TimerID);
163 ListBox1.Items.Add('WMTimer - '+AStr);
/dports/editors/cudatext/CudaText-1.151.0/app/
H A Dproc_str.pas30 function SRegexReplaceSubstring(const AStr, AStrFind, AStrReplace: string; AUseSubstitute: boolean)… in SRegexReplaceSubstring()
42 function SRegexFindParts(const ARegex, AStr: string; out AParts: TRegexParts): boolean; in SRegexFindParts()
108 function SRegexFindParts(const ARegex, AStr: string; out AParts: TRegexParts): boolean; in SRegexFindParts()
122 if AStr='' then exit;
132 Obj.InputString:= AStr;
225 function SRegexReplaceSubstring(const AStr, AStrFind, AStrReplace: string; AUseSubstitute: boolean)…
229 Result:= AStr;
230 if AStr='' then exit;
238 Result:= Obj.Replace(AStr, AStrReplace, AUseSubstitute);
/dports/lang/fpc-source/fpc-3.2.2/tests/webtbs/
H A Dtw10681.pp8 AStr : string;
13 AStr := '1.2345';
14 Val(AStr, AComp, AInt);
H A Dtw26615.pp13 class function Cr(AStr: UnicodeString): UnicodeString; static; overload;
16 class function TStringHelper.Cr(AStr: UnicodeString): UnicodeString;
18 Result := '#'+AStr;
/dports/editors/lazarus-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/fpvectorial/
H A Ddxfvectorialreader.pas656 (AStr = 'TABLE');
662 (AStr = 'BLOCK') or
663 (AStr = 'ENDBLK');
672 (AStr = 'ARC') or
675 (AStr = 'BODY') or
679 (AStr = 'HATCH') or
683 (AStr = 'LINE') or
691 (AStr = 'RAY') or
697 (AStr = 'TEXT') or
702 (AStr = 'XLINE');
[all …]
H A Dsvgvectorialreader.pas334 lStr := Trim(AStr);
381 lStr := Copy(AStr, 2, Length(AStr));
1250 (AStr = 'stroke') or (AStr = 'stroke-width') or
1251 (AStr = 'stroke-dasharray') or (AStr = 'stroke-opacity') or
1256 (AStr = 'fill') or (AStr = 'fill-opacity') or
1258 (AStr = 'font-size') or (AStr = 'font-family') or
1259 (AStr = 'font-weight') or (AStr = 'text-anchor');
3431 ValueStr := AStr;
3437 ValueStr := AStr;
3457 if AStr[Length(AStr)] = '%' then
[all …]
H A Dpdfvrsemantico.pas20 function StringToFloat(AStr: string): Double; in StringToFloat()
32 function AnSemantico.StringToFloat(AStr: string): Double; in AnSemantico.StringToFloat()
34 if Pos('.', AStr) > 0 then Result := StrToFloat(AStr, FPointSeparator)
35 else Result := StrToFloat(AStr, FCommaSeparator);
/dports/editors/lazarus-qt5/lazarus/components/fpvectorial/
H A Ddxfvectorialreader.pas656 (AStr = 'TABLE');
662 (AStr = 'BLOCK') or
663 (AStr = 'ENDBLK');
672 (AStr = 'ARC') or
675 (AStr = 'BODY') or
679 (AStr = 'HATCH') or
683 (AStr = 'LINE') or
691 (AStr = 'RAY') or
697 (AStr = 'TEXT') or
702 (AStr = 'XLINE');
[all …]
H A Dsvgvectorialreader.pas334 lStr := Trim(AStr);
381 lStr := Copy(AStr, 2, Length(AStr));
1250 (AStr = 'stroke') or (AStr = 'stroke-width') or
1251 (AStr = 'stroke-dasharray') or (AStr = 'stroke-opacity') or
1256 (AStr = 'fill') or (AStr = 'fill-opacity') or
1258 (AStr = 'font-size') or (AStr = 'font-family') or
1259 (AStr = 'font-weight') or (AStr = 'text-anchor');
3431 ValueStr := AStr;
3437 ValueStr := AStr;
3457 if AStr[Length(AStr)] = '%' then
[all …]
/dports/editors/lazarus/lazarus/components/fpvectorial/
H A Ddxfvectorialreader.pas656 (AStr = 'TABLE');
662 (AStr = 'BLOCK') or
663 (AStr = 'ENDBLK');
672 (AStr = 'ARC') or
675 (AStr = 'BODY') or
679 (AStr = 'HATCH') or
683 (AStr = 'LINE') or
691 (AStr = 'RAY') or
697 (AStr = 'TEXT') or
702 (AStr = 'XLINE');
[all …]
H A Dsvgvectorialreader.pas334 lStr := Trim(AStr);
381 lStr := Copy(AStr, 2, Length(AStr));
1250 (AStr = 'stroke') or (AStr = 'stroke-width') or
1251 (AStr = 'stroke-dasharray') or (AStr = 'stroke-opacity') or
1256 (AStr = 'fill') or (AStr = 'fill-opacity') or
1258 (AStr = 'font-size') or (AStr = 'font-family') or
1259 (AStr = 'font-weight') or (AStr = 'text-anchor');
3431 ValueStr := AStr;
3437 ValueStr := AStr;
3457 if AStr[Length(AStr)] = '%' then
[all …]
H A Dpdfvrsemantico.pas20 function StringToFloat(AStr: string): Double; in StringToFloat()
32 function AnSemantico.StringToFloat(AStr: string): Double; in AnSemantico.StringToFloat()
34 if Pos('.', AStr) > 0 then Result := StrToFloat(AStr, FPointSeparator)
35 else Result := StrToFloat(AStr, FCommaSeparator);
/dports/editors/lazarus-qt5-devel/lazarus-6df7e8756882f7d7f28f662011ee72f21746c580/components/fpvectorial/
H A Ddxfvectorialreader.pas656 (AStr = 'TABLE');
662 (AStr = 'BLOCK') or
663 (AStr = 'ENDBLK');
672 (AStr = 'ARC') or
675 (AStr = 'BODY') or
679 (AStr = 'HATCH') or
683 (AStr = 'LINE') or
691 (AStr = 'RAY') or
697 (AStr = 'TEXT') or
702 (AStr = 'XLINE');
[all …]
H A Dsvgvectorialreader.pas334 lStr := Trim(AStr);
381 lStr := Copy(AStr, 2, Length(AStr));
1250 (AStr = 'stroke') or (AStr = 'stroke-width') or
1251 (AStr = 'stroke-dasharray') or (AStr = 'stroke-opacity') or
1256 (AStr = 'fill') or (AStr = 'fill-opacity') or
1258 (AStr = 'font-size') or (AStr = 'font-family') or
1259 (AStr = 'font-weight') or (AStr = 'text-anchor');
3431 ValueStr := AStr;
3437 ValueStr := AStr;
3457 if AStr[Length(AStr)] = '%' then
[all …]
/dports/comms/cqrlog/cqrlog-2.5.0/src/lnet/lib/
H A Dlhttputil.pp50 function HTTPDecode(AStr: pchar): pchar;
51 function HTTPEncode(const AStr: string): string;
159 function HTTPDecode(AStr: pchar): pchar;
163 lDest := AStr;
165 lPos := AStr;
179 if lDest <> AStr then
180 Move(AStr^, lDest^, lPos-AStr);
181 Inc(lDest, lPos-AStr);
182 AStr := lNext;
194 len := Length(AStr);
[all …]
/dports/lang/fpc-utils/fpc-3.2.2/utils/fppkg/lnet/
H A Dlhttputil.pp50 function HTTPDecode(AStr: pchar): pchar;
51 function HTTPEncode(const AStr: string): string;
159 function HTTPDecode(AStr: pchar): pchar;
163 lDest := AStr;
165 lPos := AStr;
179 if lDest <> AStr then
180 Move(AStr^, lDest^, lPos-AStr);
181 Inc(lDest, lPos-AStr);
182 AStr := lNext;
194 len := Length(AStr);
[all …]
/dports/lang/fpc-source/fpc-3.2.2/utils/fppkg/lnet/
H A Dlhttputil.pp50 function HTTPDecode(AStr: pchar): pchar;
51 function HTTPEncode(const AStr: string): string;
159 function HTTPDecode(AStr: pchar): pchar;
163 lDest := AStr;
165 lPos := AStr;
179 if lDest <> AStr then
180 Move(AStr^, lDest^, lPos-AStr);
181 Inc(lDest, lPos-AStr);
182 AStr := lNext;
194 len := Length(AStr);
[all …]
/dports/net/mDNSResponder/mDNSResponder-1310.140.1/ServiceRegistration/
H A Dlog_srp.m13 #define AStr(str) [[NSAttributedString alloc] initWithString:(str)] macro
14 #define AStrWithFormat(format, ...) AStr(([[NSString alloc] initWithFormat:format, __VA_ARGS__]))
65 a_str = AStr(ns_str != nil ? ns_str : nil);
85 require_action_quiet(data.bytes != nil, exit, a_str = AStr(@"<null>"));
93 require_action(ret == kNoErr, exit, a_str = AStr(@"Malformed Domain Name"));
96 a_str = AStr(ns_str != nil ? ns_str : nil);
127 require_action(ret > 0, exit, a_str = AStr(@"<failed to decode - MAC address conversion failed>"));
130 a_str = AStr(ns_str != nil ? ns_str : nil);

12345678910>>...20