clsError -
dataString -
eliminuj_str -
haltix - ----------------------------------
isError -
klik -
mark_time -
mark_time2 -
memWarning -
minus_time -
minus_time2 -
posLeft - --tekstowe---
posRight -
spaces -
str2 -
stringer -
TakeKeyPress -
Tkursor -
txt_sorter -
waitsync - ----------------------------------
wReadkey -
zamien_str -
procedure clsError;
procedure dataString(var s:String);
procedure eliminuj_str(var s:string;s1:string);
procedure haltix(s:string);
----------------------------------
function isError:boolean;
function klik:byte;
procedure mark_time(var czas:longint);
procedure mark_time2(var czas:word);
procedure memWarning(kb:word);
function minus_time(old:longint) :longint;
function minus_time2(old:word) :word;
function posLeft(var s:string;i:byte;ch:char):byte;
--tekstowe---
function posRight(var s:string;i:byte;ch:char):byte;
function spaces(ile:byte):string;
function str2(w:word):string;
procedure stringer(var s:string);
procedure TakeKeyPress;
procedure Tkursor (jest:boolean);
procedure txt_sorter (var txt:txt_array;ile:byte);
procedure waitsync;
----------------------------------
function wReadkey:word;
procedure zamien_str(var s:string;s1,s2:string);