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

Вниз

Замена символа в строке другим символом   Найти похожие ветки 

 
lewka-serdceed   (2008-06-20 18:56) [0]

Подскажите пожалйста уважаемые мастера программирования, что мне исправить в этом коде, чтобы не было ошибки Incompatible types "Char" and "String".

procedure TForm1.Button1Click(Sender: TObject);
var
n,i:integer;
 a,s:PChar; // если тут изменить на String, все равно не работает
begin

n:=0;
 s:=PChar(edit1.Text);
  for i:=1 to Length(s) do
 begin
   if s[i]="я" then begin s[i]:="ya";

  label1.Caption:=label1.Caption+s[i];

end; end;

end;


 
tesseract ©   (2008-06-20 19:08) [1]

Всё. зачем тебе Pchar? Его индексация  с [0] кстати.


 
lewka-serdceed   (2008-06-20 19:09) [2]

какой тип тогда взять? String не идет тоже.


 
Сергей М. ©   (2008-06-20 19:22) [3]


>  Замена символа .. что мне исправить в этом коде


Не надо ничего исправлять, эта задача реализуется штатной функцией StringReplace(), которая работает со string-типами параметров и результата.


 
Anatoly Podgoretsky ©   (2008-06-20 20:49) [4]

> lewka-serdceed  (20.06.2008 18:56:00)  [0]

S[I] это Char

"ya" это стринг

И ты не можешь а один байт (Char) поместить два байта/символа



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
2-1213959404
Alex_C
2008-06-20 14:56
2008.07.20
Вопрос по GetObjectProp


2-1213805282
Kaer
2008-06-18 20:08
2008.07.20
Вопрос о консольном приложении и функции


2-1213768672
lewka-serdceed
2008-06-18 09:57
2008.07.20
Открытие файла


1-1195553133
DVM
2007-11-20 13:05
2008.07.20
TWinControl.WMPaint от Delphi7 запостите пожалуйста.


15-1212567305
[i2e]
2008-06-04 12:15
2008.07.20
справка (help) для висты. как сделать?