[Delphi] TkbmMemTable - szyfrowanie

0

Witam,
Czy ktoś z Was korzystał może z komponentów bazodanowych operujących na pamięci, takich jak TkbmMemTable?
Korzystam z komponentu TkbmMemTable. Bez problemu mogę odczytywać i zapisywać dane do plików csv i bin, ale chciałbym zapisać je tak, by nie były one widoczne w pliku podejrzanym np. notatnikiem. Wiem, że możliwy jest taki zapis z kompresją albo szyfrowaniem za pomocą tego komponentu, ale nie mam pojęcia, jak się za to zabrać.
Dziękuję za wszystkie wskazówki i sugestie.

0

Gdyby ktoś się kiedyś zmagał z podobnym problemem podaję odpowiedź:

  1. Wrzucamy na formę komponent TkbmMemTable

  2. Wrzucamy na formę komponent TkbmBinaryStreamFormat (może też być TkbmCsvStreamFormat)

  3. Ustawiamy właściwość TkbmMemTable.AllDataFormat na KbmBinaryStreamFormat (można też użyć właściwości DefaultDataFormat).

  4. W zdarzeniach OnCompress i OnDecompress komponentu TkbmBinaryStreamFormat wpisujemy procedury kompresji i dekompresji danych operujące na strumieniach przekazanych w parametrach procedur obsługi zdarzeń.

  5. Zapis i odczyt z danych realizują metody TkbmMemTable.SaveToFile(nazwa_pliku) i TkbmMemTable.LoadFromFile(nazwa_pliku).

Można też wymusić zapis i odczyt w innym formacie niż domyślny za pomocą metod SaveToFileViaFormat i LoadFromFileViaFormat.

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