[rzawm]

Всем доброго времени суток!
Уважаемые комрады, требуется помощ, ответ думаю элементарен, но никак я сам его не найду.
Суть вопроса
Есть форма, на форме TMemo, TButton, TSaveDialog, TZipForge.
В процессе работы приложения Memo заполняется различными данными и в некоторый момент времени нам надо щелкнув Button содержимое Memo сохранить в zip архив, задав имя архива через savedialog. Сам архив и архивировируемый файл должный иметь одно и тоже имя, взятое из savedialog, архивируемый файли должен лежать в корне полученного архива, без каких либо папок.
пример:
щелкнули по button вышел savedialog, в нем указали имя например 945 и решили сохранить например на рабочем столе, в итоге у нас должен полчуится zip архив на рабочем столе 945.zip а в нем файлик 945.txt без каких либо папок.

Уважаемые, очень надо! Буду очень благодарен!