Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Класс для работы со строкой

Автор: Postal_Dude 16.05.2006 20:06

помогите пожалусто :
Опишите объектный тип Objstring, который используется для хранения строкового значения и содержит методы: проверки - является ли строка пустой, усечения строки до заданной длины и разбиения ее на 2 подстроки.

Автор: volvo 16.05.2006 20:23

Только описАть? Ну, смотри:

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;
Реализация - за тобой, договорились? smile.gif

Автор: Postal_Dude 16.05.2006 20:26

м...а можете всеже показать как написать эти функции?...ато я уже запарился. пожалуста...

Автор: volvo 16.05.2006 20:50

Ну, если тебя устраивает размер строки, хранящейся в ObjString (до 256 символов), то все просто:

constructor TObjString.Init(const s: 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;
Если нужна возможность хранить более длинную строку, работай с PChar, а не String...

Автор: Postal_Dude 16.05.2006 20:54

устраивает. спасибо!