Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.31;
Скачать: CL | DM;

Вниз

Изменение длины переменной типа string во время работы   Найти похожие ветки 

 
Merfi   (2004-10-16 12:40) [0]

Допустим объявлена переменная buf:string;
Можно ли во время работы задать этой переменной определенную длину, т.е. buf[i]


 
GuAV ©   (2004-10-16 13:39) [1]

Задать длину для строки можно процедурой SetLength.


 
Merfi   (2004-10-17 11:00) [2]

Попробовал, но ничего не изменилось. Привожу код
var
buf:string;
i:integer;
f:textfile;
begin
AssignFile(f,"1.txt");
Reset(f);
i:=4;
setlength(buf,i);
read(f,buf);
Label1.Caption:=buf;
end;
Он считывает не 4 символа, а всю строчку


 
VMcL ©   (2004-10-17 11:54) [3]

>>Merfi  (17.10.04 11:00) [2]

Label1.Caption := Copy(buf, 1, 4);


 
Anatoly Podgoretsky ©   (2004-10-17 12:14) [4]

string это тип с автоматически управляемой длиной.
read считывает всю строку до конца



Страницы: 1 вся ветка

Текущий архив: 2004.10.31;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.034 c
4-1096405863
Alex870
2004-09-29 01:11
2004.10.31
Цвет бордюра


6-1092218996
TONG
2004-08-11 14:09
2004.10.31
download при помощи delphi


1-1097856511
Гость
2004-10-15 20:08
2004.10.31
Пишу тест! Помогите!


1-1097832637
TeNY
2004-10-15 13:30
2004.10.31
Как определить равенсво двух обьектов тип Tpicture?


1-1097776898
Viper
2004-10-14 22:01
2004.10.31
ФАЙЛЫ





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский