Strcopy

Internφ programovacφ jazykSQL

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

Parametry

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

Popis

Funkce Strcopy vybere z °et∞zce s pod°et∞zec zaΦφnajφcφ v pozici index dΘlky count. ╪et∞zce se indexujφ od 1. Funkci lze pou₧φt pouze na °et∞zce do dΘlky 255 znak∙.

Hodnota funkce

Funkce vracφ pod°et∞zec vybran² z °et∞zce s.

P°φklad

ss := 'C:\*.DBF';
  if Select_file(0,ss) then 
    if StrCopy(ss,StrLength(ss)-2,3)='DBF' then begin
      Reset(f,ss);                       // otev°enφ DBF souboru
      Set_status_text("NaΦφtßm hlaviΦku DBF souboru");
      ...

Viz