Lekce 1.37
Zpracovßnφ memopolo₧ek z programu

S memopolo₧kami m∙₧ete pracovat dv∞mi zp∙soby. Bu∩ k nφ p°istupujete jako k textu (je mo₧nΘ pracovat v₧dy s konkrΘtnφm zadan²m odstavcem), nebo k p°istupujete celkov∞. P°i textovΘm p°φstupu musφte poΦφtat s tφm, ₧e lze takto zpracovßvat pouze memopolo₧ky do dΘlky 64 Kb na jeden zßznam.

Obsah zadanΘ memopolo₧ky jednoho zßznamu je mo₧nΘ p°evΘst do textovΘ prom∞nnΘ procedurou DbfReadBin. Obdobn∞ je mo₧nΘ p°esunout obsah prom∞nnΘ do memopolo₧ky procedurou DbfWriteBin. UvedenΘ procedury je mo₧nΘ pou₧φt pro zpracovßnφ memopolo₧ek libovolnΘ dΘlky. Podobn∞ je mo₧nΘ pou₧φt proceduru DbfFileToBin pro zßpis obsahu souboru na disku do memopolo₧ky a proceduru DbfBinToFile pro zßpis memopolo₧ky do souboru.

Obsah textovΘ prom∞nnΘ lze ulo₧it do memopolo₧ky procedurou DbfWriteMem. NaΦφst obsah memopolo₧ky je mo₧nΘ procedurou DbfReadMem. Memopolo₧ka nesnφ mφt v tomto p°φpad∞ rozsah v∞tÜφ ne₧ 64 Kb. Memopolo₧ku obsahujφcφ text je mo₧nΘ naΦφtat postupn∞ po odstavcφch. Po°adovΘ Φφslo indexu se udßvß parametrem index v po°adφ od jedniΦky. Pokud budete chtφt naΦφst najednou celou memopolo₧ku, zadejte nulov² index. V tomto p°φpad∞ bude z naΦtenΘho °et∞zce odstran∞n znak #10 pro mo₧nost zobrazenφ v textovΘm v²stupnφm okn∞.

'kompletnφ v²pis memopolo₧ky do textovΘho v²stupu
Sub vypis
    z = DbfMemoCount("poznamka")
    If z > 0 then
       ConsoleClear
       For x = 1 to z
           Writeln(DbfReadMem("poznamka", x))
       Next
    Else
        Writeln("P°ekroΦen rozsah memopolo₧ky")
    End If
End Sub