代码搜索：AnsiString
找到约 5,210 项符合「AnsiString」的源代码
代码结果 5,210
www.eeworm.com/read/246404/12727371
pas ac1138.pas
program tju1138;
const
maxterms=1000;
type
term=record factor,index:longint;end;
formula=array[1..maxterms]of term;
var
a,b,c:formula;
p,la,lb,lc,i,j:longint;
s:ansistring;
fir
www.eeworm.com/read/246404/12727847
pas ac1138.pas
program tju1138;
const
maxterms=1000;
type
term=record factor,index:longint;end;
formula=array[1..maxterms]of term;
var
a,b,c:formula;
p,la,lb,lc,i,j:longint;
s:ansistring;
fir
www.eeworm.com/read/339554/12225303
pas ac1138.pas
program tju1138;
const
maxterms=1000;
type
term=record factor,index:longint;end;
formula=array[1..maxterms]of term;
var
a,b,c:formula;
p,la,lb,lc,i,j:longint;
s:ansistring;
fir
www.eeworm.com/read/465806/7046376
~pas cipher.~pas
unit cipher;
interface
type tablica =array [0..76] of ansistring;
const
Pierwsza : tablica = ('74','91','77','76','BA','71','70','9D',
'73','72','7D','7C','7F','7E',
www.eeworm.com/read/465806/7046391
pas cipher.pas
unit cipher;
interface
type tablica =array [0..76] of ansistring;
const
Pierwsza : tablica = ('74','91','77','76','BA','71','70','9D',
'73','72','7D','7C','7F','7E',
www.eeworm.com/read/445796/7590063
pas sqlite3lib.pas
Unit SQLite3Lib;
Interface
{$I Sqlite.inc}
Uses
Sqlite3Types;
Var
SQLite3_DllName: AnsiString = 'Sqlite3.dll';
SQLite3_DllHandle: THandle;
{$IFDEF UseSQLiteCrypt}
SQLite3_Ke
www.eeworm.com/read/493718/6389300
pas ac1004.pas
program ural1004;
const
maxn=100;
inf=65535;
var
p:array[1..maxn,1..maxn]of word;
n,x,y:shortint;
m,i,l,ans:word;
route:ansistring;
procedure dijkstra(src:byte);
var
s:set
www.eeworm.com/read/231652/14225026
pas ac1004.pas
program ural1004;
const
maxn=100;
inf=65535;
var
p:array[1..maxn,1..maxn]of word;
n,x,y:shortint;
m,i,l,ans:word;
route:ansistring;
procedure dijkstra(src:byte);
var
s:set
www.eeworm.com/read/184327/9110183
pas ac1239.pas
program tju1239;
var
p,q:ansistring;
n,u,lp,lq,l,i,pp,pq,count:word;
function match(sp,sq,l:word):boolean;
var
i:word;
begin
for i:=1 to l do
if (p[sp+i]'?') and (q[sq
www.eeworm.com/read/246404/12728914
pas ac1239.pas
program tju1239;
var
p,q:ansistring;
n,u,lp,lq,l,i,pp,pq,count:word;
function match(sp,sq,l:word):boolean;
var
i:word;
begin
for i:=1 to l do
if (p[sp+i]'?') and (q[sq