[TP] krótka instrukcja - PLZ HELP !

0

Mam cos takiego:

VAR
x,y : 0..100;
plik : text;
dostep : string;

...
x := 0;
FOR y := 4 TO 10 DO
BEGIN
x := x + 1;
Assign(plik,'problem');
Reset(plik);
Readln(plik,dostep);
Close(plik);
Gotoxy(47,y);
Write(dostep);
END;
...
Problem - Potrzebuje aby plik nazwany był np. d1..d7 ( to reguluje zmienna x) Ale nie moge bo jak chce zrobic :
Assign(plik,'d'+x'.txt'); To wyskakuje słusznie ze niepasuja zmienne (Type Mismatch). Potrzebuje zrobic jakby InToStr w Pascalu.
Help
--Pozdrawiam
Gw

0

po prostu musisz przerobic ta zmienna X na string
sluszy do tego procka STR ale nie pamietam teraz jak jej sie uzywa :)

0

Assign(plik,'d'+IntToStr(x)+'.txt');

0

mirekpil napisał:
Assign(plik,'d'+IntToStr(x)+'.txt');

IntToStr nie istniało za czasów TP :(--Vogel [Delphi 6 PE]

Life is just a dream, you know...
[Cowboy Bebop]

0

Vogel napisał:
IntToStr nie istniało za czasów TP :(

Ale Str istniało :) Gorszy problem był z tym, że nie istniało IntToHex :( (musiałem pisać własną funkcję)--Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0