Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Array of Char - problem.

[es] :: Pascal / Delphi / Kylix :: Array of Char - problem.

[ Pregleda: 2378 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

yokid

Član broj: 38351
Poruke: 36
*.041net.co.yu.



Profil

icon Array of Char - problem.14.09.2005. u 11:26 - pre 226 meseci
Ako imam:

const MAX_PATH_SIZE = 1024;

var
szSourcePath : Array[0..MAX_PATH_SIZE+1] of Char;

...

Kako da dodam vrednosti u szSourcePath?
Na primer:
'MorProgram v1.0 program.exe '
 
Odgovor na temu

bondja

Član broj: 10286
Poruke: 167
*.adsl.sezampro.yu.



+3 Profil

icon Re: Array of Char - problem.14.09.2005. u 12:06 - pre 226 meseci
const MAX_PATH_SIZE = 1024;

var
szSourcePath : Array[0..MAX_PATH_SIZE+1] of Char;

procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
i: integer;

aSTr: string;
begin
s := 'MorProgram v1.0 program.exe ';

for i:=1 to Length(s) do
begin
if i < MAX_PATH_SIZE then
szSourcePath[i-1] := s;
end;

// provera!
aStr := '';
for i:=Low(szSourcePath) to High( szSourcePath) do
aStr := aStr + szSourcePath;
self.caption := aStr;
end;

poz!
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: Array of Char - problem.14.09.2005. u 12:15 - pre 226 meseci
Ako ti to treba za razne API funkcije koje uzimaju pointer na array of char onda ce ti ovo biti elegantnije resenje:
Code:
function GetWinDir: String;
begin
  SetLength(Result, MAX_PATH);
  SetLength(Result, GetWindowsDirectory(PChar(Result), MAX_PATH));
end;

Meni je ovo nekako normalnije resenje. Kad vec imas String tip koji se ponasa kao pointer na array of char zasto to onda ne iskoristiti!?
 
Odgovor na temu

yokid

Član broj: 38351
Poruke: 36
*.041net.co.yu.



Profil

icon Re: Array of Char - problem.14.09.2005. u 12:45 - pre 226 meseci
Hvala Bondja, hvala Srki_82.
 
Odgovor na temu

yokid

Član broj: 38351
Poruke: 36
*.041net.co.yu.



Profil

icon Re: Array of Char - problem.14.09.2005. u 13:02 - pre 226 meseci
Bondja, ipak postoji problem.

Incompatible types: 'Char' and 'String' na:

szSourcePath[i-1] := s;
 
Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949


+10 Profil

icon Re: Array of Char - problem.14.09.2005. u 13:08 - pre 226 meseci
Verovatno je mislio s[ i ]

[Ovu poruku je menjao Srki_82 dana 14.09.2005. u 14:10 GMT+1]
 
Odgovor na temu

engineer

Član broj: 45205
Poruke: 113
*.metrohive.neobee.net.

Jabber: engineer


Profil

icon Re: Array of Char - problem.15.09.2005. u 09:06 - pre 226 meseci
Koristi StrCopy funkciju:

Code:

StrCopy(szSourcePath, 'MorProgram v1.0 program.exe');
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Array of Char - problem.

[ Pregleda: 2378 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.