SaveTextToStreamA
Description
Exporte le document ou la sélection sous forme de texte ANSI.
function SaveTextToStreamA (const Path: String; Stream: TStream; LineWidth: Integer; SelectionOnly, TextOnly: Boolean): Boolean
Paramètre |
Description |
Path |
Chemin pour enregistrer les images et autres éléments non textuels. Voir le paramètre TextOnly. |
Stream |
Le flux dans lequel le document est enregistré au format texte. |
LineWidth |
LineWidth est utilisé pour enregistrer les sauts (ils sont enregistrés en tant que caractères LineWidth '-') |
SelectionOnly |
Si True, seule une partie sélectionnée du document est enregistrée. |
TextOnly |
Si True, les éléments non textuels sont ignorés lors de l'enregistrement. Si False, la représentation textuelle des éléments est enregistrée. |
Exemple
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var Txt: TFileStream;
begin
Txt := TFileStream.Create('d:\file.txt', fmCreate);
try
if Form1.RichEdit1.SaveTextToStreamA('', Txt, 1, False, True) then
ShowMessage('Fichier enregistré avec succès')
else
ShowMessage('Une erreur est survenue pendant l'export.');
finally
Txt.Free;
end;
end;