|
|
|
Junior Member
 
участник
Last Login: 08.11.2007 9:27
Сообщ.: 20,
Visits: 49
|
|
У меня компилятор Delphi 7 ругается
Incompatible types: 'String' and 'PAnsiChar'
на строку :
stpost:=StrCat(stpost,'XML_Query=');
Переменная stpost имеет в проге тип String.
Как быть?
|
|
|
|
|
Supreme Being
участник
Last Login: 29.09.2007 22:12
Сообщ.: 343,
Visits: 3 388
|
|
| strpost := StrCat(PChar(strpost), 'XML')'
|
|
|
|
|
Junior Member
участник
Last Login: 08.11.2007 9:27
Сообщ.: 20,
Visits: 49
|
|
На строке
StrLCopy(PChar(simlist[j].nomer),PChar(st),10);
выдает:
Access violation at address 005890C2 in module 'MyProga.exe'. Read of address 40C14E78.
код процедуры такой:AssignFile(simF, ExtractFilePath(Application.ExeName)+'sim.txt');
Reset(simF);
while not Eof(simF) do
begin
Readln(simF,st);
StrLCopy(PChar(simlist[k].nomer),PChar(st),10);
... и т.д. ...
simF объявлен как TextFile, simlist - массив структур, поле nomer объявлено как String. В него хотел закинуть первые десять символов из прочитанной строки.
Delphi 7
|
|
|
|
|
Supreme Being
участник
Last Login: 29.09.2007 22:12
Сообщ.: 343,
Visits: 3 388
|
|
ты приколист ? о функции Copy ничего не слыхал ?
AssignFile(simF, ExtractFilePath(Application.ExeName)+'sim.txt');
Reset(simF);
while not Eof(simF) do
begin
Readln(simF,st);
simlist[k].nomer := System.Copy(st, 1, 10);
... и т.д. ...
а если st обьявить как string[10]
то вообще
simlist[k].nomer := st;
мдя...
|
|
|
|