Strdelete

Internφ programovacφ jazykSQL

function Strdelete(var s : string; index, count : short) : string;

Parametry

s °et∞zec znak∙
index pozice v °et∞zci s
count poΦet znak∙

Popis

Funkce Strdelete zruÜφ v °et∞zci s jeho pod°et∞zec zaΦφnajφcφ v pozici index dΘlky count. ╪et∞zce se indexujφ od 1.

Funkci lze pou₧φt na °et∞zce delÜφ ne₧ 255 znak∙.

Hodnota funkce

V²sledn² °et∞zec je takΘ funkcφ vrßcen, aby funkci bylo mo₧no pou₧φt nap°. v SQL p°φkazu.

P°φklad

function LastBackSlash(var str : string[2000]) : boolean;
{**************************************}
// integritnφ omezenφ v pohledech, kde se zadßvß adresß° DOSu
// pokud konΦφ zp∞tn²m lomφtkem, lomφtko se uma₧e
begin
  if str[StrLength(str)] = '\' then StrDelete(str,StrLength(str),1);
  LastBackSlash := true;                 // aby proÜlo integritnφ omezenφ
end;

Viz