unit frm_Readme; {$mode objfpc}{$H+} interface uses SysUtils, Classes, Controls, Forms, Dialogs, StdCtrls; type { TfrmReadme } TfrmReadme = class(TForm) Memo1: TMemo; procedure FormActivate(Sender: TObject); private { Private declarations } public { Public declarations } end; var frmReadme: TfrmReadme; implementation {$R *.lfm} procedure TfrmReadme.FormActivate(Sender: TObject); begin Memo1.WordWrap := True; end; end.