Конвертация String в PAnsiChar в Delphi

[vandrouny]

В общем, простенькая программка, которая считает кол-во символов в Memo (все кроме пробелов)

n:integer; 
i,j:integer; 
stemp: string;

for i:=1 to memo1.lines.count-1 do
  begin
  stemp:=Memo1.Lines.Strings[i-1];
  for j:=1 to StrLen(stemp) do
  if stemp[j]<>' ' do
  n++;
  end;

Но выдаёт ошибку, мол, StrLen принимает только тип PAnsiChar. А если сделать stemp: PAnsiChar; то ругается на присвоение stemp:=Memo1.Lines.Strings[i-1], мол, разные типы. Что делать? Можно ли эти типы конвертировать?

[Пепел Феникса]

замените на Length(Memo1.Lines.Text)
и все ОК

[vandrouny]

Простите, а какую строчку заменить на Length(Memo1.Lines.Text)?
Что-то торможу

[Пепел Феникса]

не строчку а StrLen(stemp), правда там надо Length(stemp)
а вообще проще так:

n:=0;
for i:=1 to Length(memo1.lines.Text) do
  if Memo1.Lines.Text[i]<>' ' do inc(n);

кстати ++ в Делфи вроде как нету

[Ghost of Night]

Заменить

StrLen(stemp)

на

StrLen(PChar(stemp))

[vandrouny]

Ой, что-то у меня уже шарики за ролики заехали) 10 строчек, а столько ошибок)
В этом семестре у нас ужас что творится, пишем лабы сразу на 3 языках, да ещё курсовая)
В общем, вот правильный код (построчную обработку я оставил, так как мне это потом ещё надо будет)

n:=0;
for i:=1 to memo1.lines.count do
  begin
  stemp:=Memo1.Lines.Strings[i-1];
  for j:=1 to Length(stemp) do
  if stemp[j]<>' ' then
  inc (n);
  end;

Спасибо за помощь!