Problem z wczytywaniem 1000 znakow w turbo pascalu

NataliaSt · Post autor: **NataliaSt** » 11 kwie 2009, o 19:20

mam taki problem potrzebuje pobrac za jednym razem 1000 znakow a pobiera mi jedynie 255 znakow kod wyglada tak<przykładowo>
var
a:ansistring;
begin
readln(a);
end.
i pobiera mi jedynie 255 znakow. A w tym linku pisze ze to do długich lancuchow znakowych.Prosze o pomoc:)

klaustrofob · Post autor: **klaustrofob** » 11 kwie 2009, o 19:25

pracujesz w dosie? to najprawdopodobniej ograniczenie systemu operacyjnego, funkcja readln czyta ze standardowego wejścia.

NataliaSt · Post autor: **NataliaSt** » 11 kwie 2009, o 19:34

no jak robie read jest to samo. Co moge zrobicx aby wczytac 1000 znakow?

klaustrofob · Post autor: **klaustrofob** » 11 kwie 2009, o 19:38

read to w zasadzie readln. nie dam głowy, ale wydaje mi się, że musisz samodzielnie oprogramować wejście. albo zrób kilka readln, które wczytują do zwykłego stringa, a następnie konkatenuj je z ansistringiem.

Post autor: **Afish** » 12 kwie 2009, o 10:52

Albo podaj programowi dane z pliku. Zapisz wszystkie dane do jakiegoś pliku tekstowego i potem z konsoli wywołaj:
program.exe < dane.txt

NataliaSt · Post autor: **NataliaSt** » 13 kwie 2009, o 20:31

Dziekuje za pomoc tak zrobiłam i wszystko działa:)