Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

08.02.2008, 20:34
|
|
Новичок
Регистрация: 03.02.2008
Сообщений: 5
Провел на форуме: 11617
Репутация:
0
|
|
Дайте плз ссылку на Delphi 7
|
|
|

08.02.2008, 23:07
|
|
Познающий
Регистрация: 18.12.2007
Сообщений: 32
Провел на форуме: 614948
Репутация:
86
|
|
Darkor, юзай гугл! http://infostore.org/info/1721611
|
|
|

09.02.2008, 00:46
|
|
Новичок
Регистрация: 09.11.2007
Сообщений: 24
Провел на форуме: 60954
Репутация:
3
|
|
Уважаемые кодеры, помогите с такой проблемкой:
Вот например,
Код:
...
var
s1,s2:string;
begin
s2:=s1+'Filename'
....
прекрасно работает, а
Код:
...
var
s1,s2:pchar;
begin
s2:=s1+'Filename'
....
нет  Мне нужно работать именно с pchar таким образом. Но Как?
|
|
|

09.02.2008, 00:48
|
|
Постоянный
Регистрация: 05.01.2007
Сообщений: 508
Провел на форуме: 2360904
Репутация:
1393
|
|
Сообщение от Derec
Уважаемые кодеры, помогите с такой проблемкой:
Вот например,
Код:
...
var
s1,s2:string;
begin
s2:=s1+'Filename'
....
прекрасно работает, а
Код:
...
var
s1,s2:pchar;
begin
s2:=s1+'Filename'
....
нет  Мне нужно работать именно с pchar таким образом. Но Как?
PChar это указатель не переменную типа чар, если я не ошибаюсь. Для работы с pchar, есть ф-ция PChar()
|
|
|

09.02.2008, 00:57
|
|
Новичок
Регистрация: 09.11.2007
Сообщений: 24
Провел на форуме: 60954
Репутация:
3
|
|
z01b, это я понимаю. Но суть моей проблемы в другом. Нужно как то склеить две переменные типа pchar! Например там:
Код:
s1:pchar='file1';
s2:pchar='file2';
s3:pchar;
s3:=s2+s1;
writeln(s3);
Но идея с плюсом не прокатит, как то их по другому склеить надо????
|
|
|

09.02.2008, 00:59
|
|
Постоянный
Регистрация: 29.04.2007
Сообщений: 496
Провел на форуме: 2715445
Репутация:
588
|
|
lstrcatA(s2,s1); результат будит в s2
|
|
|

09.02.2008, 01:01
|
|
Новичок
Регистрация: 09.11.2007
Сообщений: 24
Провел на форуме: 60954
Репутация:
3
|
|
Hellsp@wn, и так пробовал, почему то обнуляет строку s2 
Последний раз редактировалось Derec; 09.02.2008 в 01:06..
Причина: тьфу ты, то есть s2
|
|
|

09.02.2008, 01:42
|
|
Участник форума
Регистрация: 20.12.2007
Сообщений: 295
Провел на форуме: 1777055
Репутация:
347
|
|
s3:=pChar(string(s2)+string(s1));
|
|
|

09.02.2008, 02:01
|
|
Новичок
Регистрация: 09.11.2007
Сообщений: 24
Провел на форуме: 60954
Репутация:
3
|
|
Сообщение от bons
s3:=pChar(string(s2)+string(s1));
Ребят, спасиб конечно, но это всё не то! мне нужно сделать прогу без библиотеки windows! а поэтому в ней не должно быть каких либо намеков на использование плюсов(pchar нельзя "склеить") и уж тем более на использование функции string(). вот должна бы помочь lstrcat, но никак не получается  может у кого получилось?
|
|
|

09.02.2008, 05:05
|
|
Banned
Регистрация: 13.09.2006
Сообщений: 523
Провел на форуме: 2869410
Репутация:
925
|
|
var
str1,str2 : array[0..128]of char;
begin
str1:='Скомпелируем в';
str2:='месте!';
lstrcat(str1,str2);
MessageBox(0,str1,0,0);
end;
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|