Jak wstawić do rekordu Tabeli Paradox plik MS Word

0

Szukam od dłuższego czasu rozwiązania problemu ( Google, delphi.about, forum DelphiPages i inne ) i nie znalazłem jak dotychczas odpowiedzi. Chciałbym podobnie jak dodaje się załącznik do wiadomości pocztowej dodać do Tabeli Paradox plik utworzony przy pomocy MS Word. Tabela na przykład zawiera pole nazwisko oraz drugie pole dokument, które będzie przechowywało pliki Worda. Domyślam się, że pole dokument powinno być typu binary lub OLE. Jak ten dokument zapisać w rekordzie Tabeli ?.

0

Mozna, mozna. W MySQL przez ODBC robilem to kiedys w ten sposob:

procedure TFormZamowienia.WczytajRTF(Sender: TObject);
var TmpBuff: Array[1..2048] of Char;
    TmpDoc: String;
    TmpCount: Integer;
    TmpFile: File;
begin
  if TableZamowienia['id'] <> NULL then
    if OpenDialogFormularze.Execute then
      begin
        try
          begin
            AssignFile(TmpFile, OpenDialogFormularze.Filename);
            Reset(TmpFile, 1);
            while not EOF(TmpFile) do
              begin
                BlockRead(TmpFile, TmpBuff, SizeOf(TmpBuff), TmpCount);
                TmpDoc := TmpDoc + TmpBuff;
              end;
            CloseFile(TmpFile);
            TableZamowienia.Edit;
            TableZamowienia['formularz'] := TmpDoc;
            TableZamowienia.Post;
            TableZamowienia.Refresh;
          end;
        except
          MessageDlg('Wczytanie pliku nie powiodło się.', mtWarning, [mbOK], 0);
        end;
      end;
end;

Mysle ze w Twoim przypadku bedzie podobnie.

0

Dziękuję za podpowiedź. Myślę, że skorzystam z tego rozwiązania.

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