08/05/21 19:41:31
>>720
こういうこと？
function TForm1.CopyEx(S:String; Idx, Cnt:Integer):String;
begin
Result := Copy(S,Idx,Cnt);
end;
08/05/21 19:41:31
>>720
こういうこと？
function TForm1.CopyEx(S:String; Idx, Cnt:Integer):String;
begin
Result := Copy(S,Idx,Cnt);
end;