помогите пожалусто :
Опишите объектный тип Objstring, который используется для хранения строкового значения и содержит методы: проверки - является ли строка пустой, усечения строки до заданной длины и разбиения ее на 2 подстроки.
TypeРеализация - за тобой, договорились?
ObjString = Object
Constructor Create(const s: string);
Function isEmpty: Boolean;
Function Truncate(Len: Byte): String;
Procedure Split(Var s1, s2: String; Where: Byte);
Private
st: String;
End;
constructor TObjString.Init(const s: string);Если нужна возможность хранить более длинную строку, работай с PChar, а не String...
begin
st := s
end;
function ObjString.isEmpty: boolean;
begin
isEmpty := (st = '')
end;
function ObjString.Truncate(Len: byte): string;
begin
{ значение хранящееся в объекте не изменяется!!! }
Truncate := copy(st, 1, Len);
end;
procedure ObjString.Split(var s1, s2: string; where: byte);
begin
{ значение хранящееся в объекте не изменяется!!! }
s1 := copy(st, 1, where);
s2 := copy(st, where+1, 255);
end;