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

Вниз

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

 
Комбинатор   (2004-07-17 18:28) [0]

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

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

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

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


 
VMcL ©   (2004-07-17 18:39) [1]

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

Не символ нуля, а #13#10.


 
Palladin ©   (2004-07-17 18:40) [2]

Каким образом ты это обнаружил?


 
Комбинатор   (2004-07-17 18:40) [3]

ТОгда как избавиться от них (а именно от #13) как я понял именно он переводит каретку на след. строку?


 
Комбинатор   (2004-07-17 18:42) [4]

В Edit на экране выводиться: word|| , т.е. как раз #13


 
Palladin ©   (2004-07-17 18:42) [5]

Использовать String, а не TStringList... и не нужно бессмысленных вызовов g.Clear после создания... чего там очищать если он только что создан?


 
GanibalLector ©   (2004-07-17 18:44) [6]

2 Комбинатор [4]
Не знаю,у меня твой код прекрасно работает...без ||


 
Комбинатор   (2004-07-17 18:45) [7]

мне он мешает, потому что я затем побитово это шифрую и эти биты вконце тоже шифруются, а затем при расшифровке приписывается ещё
#13 и получается лишние символы..


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

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


 
GanibalLector ©   (2004-07-17 18:50) [9]

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

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


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


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

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


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

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


 
Palladin ©   (2004-07-17 18:52) [12]

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


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

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


 
GanibalLector ©   (2004-07-17 18:53) [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;


 
GanibalLector ©   (2004-07-17 18:54) [15]

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

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


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

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


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

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


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


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

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


 
GanibalLector ©   (2004-07-17 18:59) [19]

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


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

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


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

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


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

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


 
Palladin ©   (2004-07-17 19:01) [23]


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

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

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

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


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

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


 
GanibalLector ©   (2004-07-17 19:02) [25]

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

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


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

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


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

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



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

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

Наверх




Память: 0.52 MB
Время: 0.054 c
1-1090335590
RedLord
2004-07-20 18:59
2004.08.01
народ как узнать создан или нет обект в рантайме


14-1089884465
slaga
2004-07-15 13:41
2004.08.01
Общие "resource"


1-1089879046
Bizon's
2004-07-15 12:10
2004.08.01
Include Version Information


1-1090231313
User_OKA
2004-07-19 14:01
2004.08.01
Горячая клавиша


14-1089970421
ghg
2004-07-16 13:33
2004.08.01
где инфа про компонент TShellTreeView