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

Вниз

Как это сделать?   Найти похожие ветки 

← →
HelpMe   (2003-01-09 13:24) [0]

Function GetName(OldName: String): String;
Var
s: Array [0..255] Of Char
begin
s := OldName + "12";
Result := String(s);
end;

Можно ли в переменную S так закинуть значение? Или надо по другому?

---

← →
Игорь Шевченко ©   (2003-01-09 13:34) [1]

StrCopy(s, PChar(OldName));
StrCat(s, "12");

---

← →
Anatoly Podgoretsky ©   (2003-01-09 13:44) [2]


Function GetName(OldName: String): String;
begin
Result := OldName + "12";
end;


Правда зачем для этого функция

---

← →
MBo ©   (2003-01-09 13:44) [3]

Function GetName(OldName: String): String;
begin
Result:= OldName + "12";
end

---

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

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

Наверх

Память: 0.47 MB
Время: 0.022 c