LtiomaP, у мя как то с английским не вери гуд, можешь сказать что там и как жать?))

Скажите что не так делаю... Использую библиотеки: font32, rms; Так сохраняю в рмс: recordslot:=OpenRecordStore("slot"); k:=""+gold; i:=AddString(recordslot, k); CloseRecordStore(recordslot); delay(500); Halt; Загружаю из рмс и вывожу на экран: recordslot:=OpenRecordStore("slot"); s:=LoadString(recordslot, i); drawImage(loadImage("/Fon_menu.png"), 0, 0); repaint; text1:="Ваш рекорд:" + chr(32) + chr(13) + s + """; TextWindow(0, 0, w, h); s1:=Format(text1, 0); DrawTextWindow; repaint; CloseRecordStore(recordslot); - а он выводит только "Ваш рекор: ""....

var recordslot: RecordStore; text1, s, k:string; s1, m, l:integer;

чёт я не понял.... когда выхожу рмс сбрасывается.... если я сначало сохраняю в рмс а потом загружаю и вывожу на экран, то всё нормально, но еси я сначало загружаю,а потом сохраняю, то ничё не выводится... хотя по идеи в первый раз при запуске должно было не показать, а потом показывать...

Со всеми вопросами кроме рмс разобрался... Почему когда приложение закрываешь рмс сбрасывается?

demon112, оно не может сбрасываться, если из него ничего не удалять.

LtiomaP, seclub.org/forum/goto/7083870/ - знаю. Как ты сам заметил, форум почему-то удаляет квадратные скобки.

demon112, там маленькое исправление надо. Вот готовый - b:=0; for j:=1 to 5 do if a[j]=6 then b:=b+1; Этот точно правильный

И переменные делай не a1...a6, а a[1]...a[6].

cHeRsAnYa1, да с этим я уже давненько разобрался. Ты просмотри код рмс (я выше писал), что там не так? Если ставлю сначало сохранение, а потом загрузку и вывод, то работает... А если наоборот, то ни в какую. Соответцтвенно он её сбрасывает. Либо напиши код проги: чтоб сначала загружала и выводила, а потом сохраняла, и чтоб работала.

demon112, абсолютно не понял что тебе надо)))

cHeRsAnYa1, мне надо в рмс сохранить (к примеру число 12), а потом загрузить и вывести на экран...