Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как избавиться от символа нуля вконце строки?


Страницы:   1 2

Комбинатор ©   (2004-07-17 18:28:00) 

Подскажите пожалуйста как избавиться от символа нуля вконце строки?

Есть след. код:

g:=TStringList.Create;
g.Clear;
g.Text:='word';
Edit.Text:=g.Text;

при этом автоматически к 'word' приписывается символ нуля, что мне крайне не надо.
Заранее спасибо.


/w\   (2004-07-17 20:03:00) [1]

мож ишь
Судя потому, как ты пишешь, следует полагать, что ты дворником уже работаешь?


\m/   (2004-07-17 19:54:00) [2]

На работу ты можишь дворником устроиться.


GanibalLector   (2004-07-17 19:02:00) [3]

я там лажанулся в спешке,но у Паладина лучше!!!без использования переменной st

надо было так
// во ...наконец-то
Edit1.Text:=st;


Комбинатор   (2004-07-17 19:01:00) [4]

Anatoly Podgoretsky
да на работу хочу устроиться и ентим заниматься...


Palladin   (2004-07-17 19:01:00) [5]


> [20] Комбинатор   (17.07.04 18:59)

Конечно не поменяется, вдумыватся надо в то что пишут, а не C&P...

// во ...наконец-то
Edit1.Text:=g.Text;

нужно исправить
Edit1.Text:=st;


Комбинатор   (2004-07-17 19:00:00) [6]

О ДА...господа...спасиб!


Anatoly Podgoretsky   (2004-07-17 19:00:00) [7]

Тебя кто то заставляет программировать на Дельфи?


Комбинатор   (2004-07-17 18:59:00) [8]

GanibalLector
всё также ничаго не поменялось...


GanibalLector   (2004-07-17 18:59:00) [9]

2 Palladin  [17]
О...прикольное решение. Царь!!! Надо будет взять на вооружение.


Palladin   (2004-07-17 18:58:00) [10]


> [16] Комбинатор   (17.07.04 18:55)

Это понятно... в таком случае #13#10 между строками будут тоже выводится в Edit1...


Palladin   (2004-07-17 18:56:00) [11]

Перлы за перлами
сразу
Edit1.Text:=Copy(g.Text,1,Length(g.Text)-2)нельзя было написать?


Комбинатор   (2004-07-17 18:55:00) [12]

Palladin  ладно, понял...
и всё равно мне нужен TStringList у меня прога написана уже и там именно он....он при добавлении строки как раз переводит
каретку, а мне нужен такой отформатированный текст...


GanibalLector   (2004-07-17 18:54:00) [13]

>пишет:
[Error] Chif.pas(58): Constant object cannot be passed as var parameter

Знаю...смотри [14]


GanibalLector   (2004-07-17 18:53:00) [14]

var g: TStringList; st:string;
begin
g:=TStringList.Create;
g.Text:='word2';
messagedlg(inttostr(length(g.text)),mterror,[mbok],0);
st:=g.Text;
messagedlg(inttostr(length(st)),mterror,[mbok],0);
  delete(st,length(st)-1,2);
messagedlg(inttostr(length(st)),mterror,[mbok],0);
// во ...наконец-то
Edit1.Text:=g.Text;

end;


Комбинатор   (2004-07-17 18:53:00) [15]

delete(g.text,length(g.text)-1,2);
пишет:
[Error] Chif.pas(58): Constant object cannot be passed as var parameter


Palladin   (2004-07-17 18:52:00) [16]

И откуда эти сказки про невлезаемость в String? Может знаешь про него, то чего не знаю я?


Anatoly Podgoretsky   (2004-07-17 18:52:00) [17]

Комбинатор   (17.07.04 18:47) [8]
То что лезет в Tstringlist то лезет в string и наоборот


Palladin   (2004-07-17 18:51:00) [18]


>  Комбинатор   (17.07.04 18:47)

Чушь городишь! По твоему TStringList.Text какого типа? И что? Не влез?


GanibalLector   (2004-07-17 18:50:00) [19]

и вправду
messagedlg(inttostr(length(g.text)),mterror,[mbok],0);
всегдв показывает на 2 символа больше!!!

Ну тогда удали 2 последних
delete(g.text,length(g.text)-1,2);


Комбинатор   (2004-07-17 18:47:00) [20]

Palladin
У меня данных будет объем большой и в string не полезет....нужен Tstringlist...


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо