Jak utworzyć plik w formacie TXT z Delphi / C ++Builder / Lazarus

Plik TXT przechowuje dokumenty tekstowe z informacjami zorganizowanymi w formie wierszy. W nowoczesnych systemach ciągi są oddzielone separatorami linii; w przeszłości używano ciągów w postaci rekordów o stałej lub zmiennej długości. Czasami koniec pliku tekstowego (zwłaszcza jeśli informacje o rozmiarze pliku nie są przechowywane w systemie plików) jest również oznaczony jednym lub kilkoma znakami specjalnymi znanymi jako znaczniki końca pliku. Ważne jest, aby pamiętać, że plik tekstowy może zawierać zarówno sformatowany, jak i niesformatowany tekst (czasami odstępy między literami i właściwości pogrubienia czcionki / kursywą są regulowane specjalnymi sekwencjami esc - znakami kontrolnymi).

Dziś jesteśmy przyzwyczajeni do tego, że formatowanie czcionek, elementy stylu, pewne rozmiary zgodnie z preferencjami użytkownika mogą być stosowane do dowolnego symbolu. Istnieją bardziej wyspecjalizowane formaty, takie jak XML, PHP, CSV i CHM; format TXT jest ułożony w ich strukturze jako podstawa.

Możesz otworzyć plik TXT nie tylko w komputerze, ale także na różnych telefonach komórkowych, smartfonach, tabletach i specjalnych czytnikach, dzięki czemu możesz pracować z plikiem tekstowym na różnych wersjach platform Microsoft Windows, Mac OS, Linux, iOS, Android i Windows Mobile. Większość użytkowników systemu Microsoft używa zwykłego Notatnika lub popularnego pakietu oprogramowania Microsoft Office w celu otwarcia TXT i użytkownicy Systemu Mac OS korzystają z wbudowanego TextEditor.

Dlaczego potrzebujmy tylko zwykłego tekstu? Na przykład wydajne urządzenia drukujące o wysokiej wydajności w bankach nadal drukują zwykły tekst (tak, sformatowany — ale tekst). A z punktu widzenia kompaktowości przechowywania informacji bez dodatkowej kompresji, nic takiego nie istnieje. Sektor korporacyjny kocha "zwykły TXT".

Tworzenie TEKSTU w Delphi bez żadnego wiersza kodu!

Przede wszystkim skompiluj projekt i zaimplementuj fastreport ze składnikiem "eksportuj do pliku tekstowego". Wygeneruj raport, uruchom go i kliknij na "Zapisz" w oknie podglądu (poniżej opiszę, jak zapisać w formacie TXT za pomocą kodu Delphi). Pojawi się okno z ustawieniami eksportu do RTF.

Możemy wybrać, które strony naszego dokumentu mają być eksportowane, niektóre strony lub zakres.

Ustawienia eksportu — czy eksportować podziały stron, tworzyć ramki, dodawać puste wiersze (po każdym wierszu raportu), używać strony kodowej OEM (kodowanie systemu Windows jest ustawione jako domyślne).

Jak zwykle można określić, gdzie zapisać plik TXT (w rejestrze lokalnym, wysłać na e-mail, przekazać do FTP lub chmury).

Otwórz po wyeksportowaniu – plik zostanie otwarty natychmiast po wyeksportowaniu przez oprogramowanie skojarzone z dokumentami TXT (Notatnik, TextEditor)

Kod do zapisywania w formacie TXT bezpośrednio z Delphi / Lazarus

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

procedura TForm1. Button1Click(Nadawca: TObject);
zaczynać
 {Generowanie raportu. Raport musi zostać wygenerowany przed wyeksportem}
frxReport1. Przygotowanieraport();
 {Ustaw zakres stron do wyeksportowania. Domyślnie eksportowane są wszystkie strony wygenerowanego raportu}
frxSimpleTextExport1. Liczba stron := '2-3';
 {Ustaw, czy chcesz wyeksportować podziały stron}
frxSimpleTextExport1. PageBreaks := Prawda;
 {Ustawianie, czy ramki wygenerowanych obiektów raportu mają być eksportowane przy użyciu znaków pseudograficznego}
frxSimpleTextExport1. Ramki := False;
 {Ustaw, czy chcesz wyeksportować puste wiersze}
frxSimpleTextExport1. EmptyLines := False;
 {Ustaw, czy tekst ma być eksportowany w kodowaniu OEM lub Windows}
frxSimpleTextExport1. Strona OEMCodepage := Fałsz;
 {Ustaw, czy plik wynikowy ma być otwarty po wyeksportowaniu}
frxSimpleTextExport1. OpenAfterExport := Fałsz;
 {Ustawianie, czy ma być wyświetlany postęp eksportu
(pokaż, która strona jest obecnie eksportowana)}
frxSimpleTextExport1. ShowProgress := Fałsz;
 {Ustawianie, czy ma być wyświetlane okno dialogowe ustawień filtru eksportu}
frxSimpleTextExport1. ShowDialog := Fałsz;
 {Ustaw nazwę wynikowego pliku.}
 {Należy pamiętać, że jeśli nazwa pliku nie zostanie ustawiona i wyłączysz okno dialogowe filtru eksportu,}
 {Okno dialogowe wyboru nazwy pliku będzie nadal wyświetlane}
frxSimpleTextExport1. Nazwa pliku := 'C:\Output\test.txt';
 {Eksportowanie raportu}
frxReport1. Eksport(frxSimpleTextExport1);
koniec;

Teraz możemy zapisać złożone dokumenty w zwykłym pliku w formacie TXT! Jednak, to nie jest jedyny sposób tworzenia złożonych, ale całkowicie tekstowych dokumentów. Należy pamiętać, że po wybraniu pliku – Nowy... (z wielokropkiem) w projektancie raportu FastReport pojawi się okno wyboru, co dokładnie chcesz utworzyć.

Wybierz "Raport dot-matrix" i przejdź do trybu tworzenia raportu TXT. Ale o tym porozmawiamy więcej innym razem.