Sidebar

Помогите Delphi

DrTressi

Хрустик
Mar 6, 2010
6,380
31
Помогите Delphi

Добрый вечер! Помогите пожалуйста, есть строчка из символов. Какая то строчка. Забитая в переменную x. Нужно из неё убрать последний символ. Как это сделать? Заранее спасибо!
 
Функция Delete(var S: String; Index, Count: Integer): Integer
Удаляет из строки S подстроку, начинающуюся с номера символа, равного Index, и содержащую до Count символов.

Длинна строки определяется функцией Length(строка).

В твоем случае должно быть как то так...

Code:
var x: string;
begin
Delete(x,(Length(x)-1),1);
end;
 
Last edited:

DrTressi

Хрустик
Mar 6, 2010
6,380
31
Строка:
Code:
Delete (Edit1.Text, (Lenght(Edit1.Text)-1,1)

ошибка:
Code:
Indeclarated identifier: 'Lenght'

[ADDED=DrTressi]1306257126[/ADDED]
2 Chuwis720: Я не совсем понимаю что такое подстрока

[ADDED=DrTressi]1306257564[/ADDED]
Беда, что делать??
 
Last edited:

NicknekitNEW

New member
May 27, 2010
14
0
0
2 DrTressi:
Значение констаты не может изменятся. Нужно сначала присвоить значение констаты переменной, например x:=y, где x - переменная, а y - констата
 
Я не уверен, но, возможно, не стоит производить подобные манипуляции с TEdit. Попробуй сделать стринговую переменную (например, str), а потом - str:=Edit1.Text; А дальше попробуй вышеупомянутые действия выполнить уже с переменной str. Не уверен, но вдруг поможет...
 

DrTressi

Хрустик
Mar 6, 2010
6,380
31
2 Chuwis720: хм.. дык разницы то вобщем то нет. Но щас попробую отпишусь)

[ADDED=DrTressi]1306259051[/ADDED]
Заработало, Спасибо огромное!!:) Только вместо -1 о нужно было поставить, ибо он удалял предпоследний:)
 
Last edited:

Game Server

CSM TV

Page QR Code

QR Code

Donate Campaign

Total amount
$0.00
Goal
$25.00

Latest profile posts

TestUser wrote on TRUP@C's profile.
Master?
TestUser wrote on TRUP@C's profile.
Hello Father

Members online

No members online now.

Discord