ページ設定で、フォントを指定します。
【レイアウト】タブー【ページ設定】グループー【ダイアログ起動ツール】を
選択し、表示された「ページ設定ダイアログ」で
【文字数と行数】タブを選択します。
右下の「フォントの設定」ボタンを選択し
表示されたフォントダイアログで
日本語用のフォントを「MS 明朝」
英数字用のフォントを「Century」
と指定してOK→OKします。
ページ設定で、フォントを指定します。
【レイアウト】タブー【ページ設定】グループー【ダイアログ起動ツール】を
選択し、表示された「ページ設定ダイアログ」で
【文字数と行数】タブを選択します。
右下の「フォントの設定」ボタンを選択し
表示されたフォントダイアログで
日本語用のフォントを「MS 明朝」
英数字用のフォントを「Century」
と指定してOK→OKします。
コマンドプロンプト⇒NETコマンド。 >net config server /hidden:yes Enterキーを押す 状況確認 >net config server
http://blog.goo.ne.jp/ashm314/e/a463d46126ffc78adcf219b91627fc26
http://apicodes.hatenablog.com/entry/win10_net_trouble
http://sekirarablog.blogspot.jp/2014/07/nas.html
net use z: https://sample.co.jp/(URL) password /user:username /persistent:yes
(net use y: https://test.co.jp/dav/box test_id /user:user_name /persistent:yes)
http://support2.microsoft.com/kb/3025036/ja
Tempフォルダ内「MSForms.exd」削除
参考URL:http://user.numazu-ct.ac.jp/~mochizuki-k/Thunderbirad_and_Stylish/index.html
アドオン[Stylish]を追加
適当に名前を新規作成して下記文字を追加。
/* フォルダペインの行間を広げる */
#folderTree treechildren:-moz-tree-row {
height: 16px !important;
min-height: 0px !important;
}
/* フォルダペインのフォントサイズを変える */
#folderTree treechildren {
font-size: 16px;
}
/* スレッドペインの行間を広げる */
#threadTree treechildren::-moz-tree-row {
min-height : 14px !important;
}
/* スレッドペイン(メッセージリストペイン)のフォントサイズを変える */
#threadTree treechildren {
font-size: 16px;
}
dm.f_PDF.Title := ‘回収予定一覧’;//ファイル名
dm.f_PDF.Subject := ‘回収予定一覧詳細’;//サブタイトル
dm.f_PDF.Producer := ‘株式会社XXXXXXX’;//作成者
dm.f_PDF.FileName := ‘回収予定一覧.pdf’;//ファイル名
dm.f_PDF.Author := k_staff_name;//製作者
dm.f_PDF.Creator := pg_name;//アプリケーション名
dm.f_PDF.OwnerPassword:= ‘123’;//管理者パスワード
dm.f_PDF.UserPassword := ‘123’;//閲覧者パスワード
dm.f_XLSE.FileName := ‘xxxxx’;//出力したいファイル名
dm.f_Report.PrepareReport;
dm.f_Report.Export(dm.f_XLSE);//出力形式….エクセルやPDF等…
private
{ Private 宣言 }
Type
TPersonData = record
fID :Integer;
fName :String;
end;
procedure Tf_basic_l.lbl_titleClick(Sender: TObject);
var
i : Integer;
// arrPsnData :array of TPersonData; //動的配列として
arrPsnData :array[0..9] of TPersonData; //動的配列として
begin
arrPsnData[0].fID := 100;
arrPsnData[0].fName := ‘test’;
arrPsnData[1].fID := 101;
arrPsnData[1].fName := ‘test2’;
i := 0;
while i <= 2 do begin
ShowMessage(arrPsnData[i].fName);
Inc(i);
end;
end;