19/11/02 17:36:12.44 zoLz180R.net
Lazrus Release 2.0.6 - November 01, 2019, 12:33:13 pm
851:デフォルトの名無しさん
19/11/03 22:59:45.28 vaTmWlaD.net
JVCLってインストールできますでしょうか？
852:デフォルトの名無しさん
20/02/27 21:04:57 re/ORI54.net
最近Lararus使い始めたんですが、普通に使えるのでびっくりしました。
Delphiで演算子オーバーロードとか使いまくってるソースも問題ないし。
演算子オーバーロードなんて昔は「ソースが一読ではわかんなくなるから反対」なんて思ってたのに。
853:デフォルトの名無しさん
20/03/02 07:51:50.68 NBY4tsQ4.net
文字コードUTF8が標準なのでむしろDelphiより使いやすいと思いますよ。
854:デフォルトの名無しさん
20/03/06 07:12:08.75 ywadnjOj.net
作ったexeが20メガ超えててなんだかなぁ～とおもた
855:デフォルトの名無しさん
20/03/06 10:30:39 50MIG5ia.net
C#ですら数kbだからな
どうせ要らんもんリンクしてるんだろ
856:デフォルトの名無しさん
20/03/06 19:54:28 bd/m3dXZ.net
C#は知ってても.NET Frameworkは知らなさそう
857:デフォルトの名無しさん
20/03/06 21:40:12.67 R7giY7iW.net
乱多忌む
858:デフォルトの名無しさん
20/03/06 22:00:00 3lybco/N.net
デバッグ情報含んでるからストリップとスマートリンク有効にしろって昔からマニュアルに書いてあるぞ
UPXまでは別にやらんでもいいと思う
859:デフォルトの名無しさん
20/03/06 22:49:36 wjuomVAd.net
もうこの時代に20メガとかどうでもよくない
860:デフォルトの名無しさん
20/03/07 18:19:17.95 RZgTMQsN.net
ktkr
URLﾘﾝｸ(srad.jp)
861:デフォルトの名無しさん
20/03/07 19:35:21.43 IKkjx2Oq.net
>>854
小さくする設定もある。
コンパイルしたソフトを小さくするソフトもある。
862:デフォルトの名無しさん
20/03/07 19:47:00 zDuQOlXy.net
Lazarus 側の言い分としては、最初からいろいろリンクしてるから、
これ以降機能追加してもサイズの増加は緩やかということらしいけど、
使いもしない機能リンクしないでほしいわな。
863:デフォルトの名無しさん
20/03/18 16:54:18.85 Dqfi0yj0.net
使いもしない機能はリンクしないよ。
ソースプリーズ。
864:デフォルトの名無しさん
20/03/18 23:29:19.07 mYKGnRUi.net
>>863
URLﾘﾝｸ(wiki.freepascal.org)
どうしてコンパイル後のバイナリがこんなに大きいの？
865:デフォルトの名無しさん
20/03/24 05:32:35.18 oNI0kRN8.net
>>864
書き方（翻訳の仕方？）のせいかもしれんが、使うからこそ組み込まれるのだよ。
コマンドラインアプリや、Windows API で自前のメインウィンドウだけしかないような
アプリを作って試してみればわかるが数キロバイトになる。
866:デフォルトの名無しさん
20/03/24 07:50:05 oNI0kRN8.net
英語版見てみてみましたが、最新版はかなり内容が違う気がします。
英語版を参考にしたほうが良いと思います。
867:デフォルトの名無しさん
20/03/30 20:53:33.92 G4pdB0Ew.net
FPC 3.2.0 rc1 始まったで
URLﾘﾝｸ(forum.lazarus.freepascal.org)
868:デフォルトの名無しさん
20/03/30 20:59:52.63 eoyd+Aho.net
>>867
FPCて何？
869:デフォルトの名無しさん
20/03/30 21:35:58.65 G4pdB0Ew.net
>> 863
Free Pascal Compiler
870:デフォルトの名無しさん
20/03/30 22:55:15.59 eoyd+Aho.net
>>869
ありがとう
871:デフォルトの名無しさん
20/04/03 07:39:20.81 ZRX+L3ok.net
今月新しいバージョンが出っぽいね
We are planning the next release: Lazarus 2.0.8 - April 02, 2020, 10:43:37 am
The Lazarus team has scheduled
Lazarus 2.0.8 for April 2020 (estimated 14th to 20th)
872:デフォルトの名無しさん
20/04/03 07:51:25 hz9zQM0o.net
コンパイラは3.0.4のままだけどね
FreePascalのリリースがまだかかりそうだから急遽決めたようだね
本来なら次はLazarus 2.2の予定だったみたい
873:デフォルトの名無しさん
20/04/16 19:40:21 M7pyaxbj.net
Lazarus 2.0.8 リリースされたよ
874:デフォルトの名無しさん
20/04/17 20:44:07.94 6AJsww7o.net
何が変わった？
875:デフォルトの名無しさん
20/04/18 12:59:34 VYQrLT4k.net
>>860
外字って、Unicodeにも私用領域ってあるよな。まああくまでも私用領域であって
外字専用に使うための領域ってわけではないが、そう使っても良いんだよな。
876:デフォルトの名無しさん
20/06/10 17:57:11.63 syGP3Y23.net
画面拡大してるとHI-DPI有効にしないとダイアログがでかくなるんすね。
はまりましたわ。
877:デフォルトの名無しさん
20/06/26 22:59:51.25 xWDNnrNa.net
しらんまにFPC3.2出てましたね。Lazarusの先っちょも3.2対応だとか！
878:デフォルトの名無しさん
20/06/26 23:02:47.90 xWDNnrNa.net
Lazarus2.0.10も7月には出るとか。
879:デフォルトの名無しさん
20/07/08 16:42:25.19 EmKCEK3t.net
FPC3.2はDynamicArrayに大分手が入ったみたいなので、この機会に不定長のビットマップ作成の
手持ちライブラリ書き換えてみるかな。
というか素直にFCL使えって話だが、FCLってFPCのコマンドラインアプリでも使えるの？
880:デフォルトの名無しさん
20/07/08 23:32:55.82 Omm2EhW3.net
今の１個前のバージョンでLazarus&FPCの現状はどんなもんかと以前試してみたけど
10年前のDelphiにも遠く及ばない出来だったな
コンパイル速度、デバッグモードの開始、終了が遅く（終了からIDEの切り替えが特に遅い）
フォーム無しのプログラムでメッセージダイアログを出すとコマンドプロンプト画面が出る始末
今も改善されていないんだろうなぁ
881:デフォルトの名無しさん
20/07/09 22:35:37.41 vgKD2Erb.net
ソースコードもあるし、別に本家にご注進してもいいじゃん。
なんでそこで終わらなくても良くない？
882:デフォルトの名無しさん
20/07/11 06:48:10.64 HRglNQfp.net
2.0.10 アナウンスはまだだけどsouceforge で公開されたね
883:デフォルトの名無しさん
20/07/13 19:02:02.10 40nMIxb+.net
Lazarus Release 2.0.10 - July 11, 2020, 10:55:58 am
もうリリースされたって書き込まれていたけど一応。
884:デフォルトの名無しさん
20/07/25 21:12:59.00 U1cr0g+B.net
TMemo の表示領域を得たいのですが
var
R: TRect;
begin
R.Left := 0; R.Top := 0; R.Right: = 0; R.Bottom : =0;
Memo1.Perform(EM_GETRECT, 0, Longint(@R));
ShowMessage(Format('Left=%d, Top=%d, Right=%d, Bottom=%d', [R.Left, R.Top, R.Right, R.Bottom]));
end;
を実行すると Delphi 7 だと正しい値が得られるのに Lazarus 2.0.10 だと
Left=0, Top=0, Right=0, Bottom=0
になります。
正しい値を得る方法を教えていただけませんでしょうか。
885:デフォルトの名無しさん
20/07/26 02:33:28 B7m4RLK/.net
SendMessage(Memo1.Handle, EM_GETRECT, 0, Longint(@R));
でよさそう
886:デフォルトの名無しさん
20/07/26 11:23:45.22 q3dJt1F9.net
>>885
ありがとうございます。
早速試してみたところ上手くいきました。
887:デフォルトの名無しさん
20/07/28 07:26:11 YeCqnbYl.net
せっかくのオープンソースだし、
不具合っぽいのは本家に報告してあげるとよいよ
888:デフォルトの名無しさん
20/08/23 00:18:52.03 BDUM7k5s.net
Delphi6でさんざん書いてたのに長いことマイコンのほう（ArduinoやそのほかのC）ばっかりやってたからすっかりPascal忘れてるｗ
久々にPCのアプリ書こうと思っってLazarusはじめたらforやifですらあれどうだっけ？ってなってるよ
889:デフォルトの名無しさん
20/08/29 18:23:11.35 dVc2pP/Zc
新型コロナで1割が副業を開始、内容は「フリマアプリ」「投資」「クラウドソーシング」
URLﾘﾝｸ(news.yahoo.co.jp)
2月以降に副業を始めた人の3割が本業では「管理職」、コンサルタント、マーケターなどが専門スキルを活用
URLﾘﾝｸ(moneyzine.jp)
3000人が回答！「副業・ダブルワーク」実態調査2人に1人が「副業・ダブルワーク」の経験ありと回答。
URLﾘﾝｸ(www.excite.co.jp)
20代の7割が「副業したい」、興味のある仕事は?
URLﾘﾝｸ(news.mynavi.jp)
副業の長時間労働防ぐ 新ガイドライン9月導入へ
URLﾘﾝｸ(www3.nhk.or.jp)
「毎日チョコ」生活4年 ブログで発信、趣味が副業に
URLﾘﾝｸ(style.nikkei.com)
「会社設立freee」に無料のiOSアプリ登場--スマホのみで会社設立が可能に
URLﾘﾝｸ(news.yahoo.co.jp)
月100万円の収入で本業超えも！サラリーマンYouTuberの“リアル”とは
URLﾘﾝｸ(diamond.jp)
7歳児が年俸25億円！「ユーチューバー」収益の仕組みを全解剖
URLﾘﾝｸ(diamond.jp)
「おじさん」こそユーチューバーになるべき理由、動画配信で稼ぐ極意
URLﾘﾝｸ(diamond.jp)
おじさんユーチューバーが活躍めざましい意外な理由
URLﾘﾝｸ(diamond.jp)
月100万円以上も! 会社員の副業収入、平均額は?
URLﾘﾝｸ(news.mynavi.jp)
890:デフォルトの名無しさん
20/11/05 00:09:00.98 8Msi6NAs.net
TChartのチュートリアルを和訳してみたけどWikiに追加する方法がよくわからない
891:デフォルトの名無しさん
20/12/02 23:28:05.83 r6aZV9ch.net
FreePascalのXMLチュートリアル、サンプルのしょうもないミスを修正したいが
どうすりゃいいんでしょうか。
まぁPascal使うような極まりきった方々は別にミスあっても自分で修正するでしょうけど・・
892:デフォルトの名無しさん
20/12/02 23:30:01.43 r6aZV9ch.net
マルチスレッドでレイトレーシングアプリを書いたが、LinuxでもWindowsでも
普通に動くんでビックリしましたわ。
マルチスレッド絡みだからOSとかの癖とかで差異があって大変だと思ってたので。
ちゃんとライブラリで差異を吸収してんですねぇ。
893:デフォルトの名無しさん
20/12/02 23:31:33.19 r6aZV9ch.net
あまり大声で言うべきではないでしょうが、LazarusのGTK3サポート、
まだアルファ版というのがちょっと切ない。
自分の作るしょっぱいアプリだったらFreePascalのGTK3バインディングで
十分だろうからそっちから攻めるべきか。
894:デフォルトの名無しさん
20/12/23 15:41:35.78 lutaimDh.net
ざっくり調べるとQtバインディングの方はQt6が最新でQt5はサポートしているということか。
であれば現状自分のしょっぱいLinuxアプリはQt5バインディングにしといた方が
良いかもしんないにゃー。
別にGTK2でも全く問題ないのですが・・・・
895:デフォルトの名無しさん
20/12/23 16:37:45.86 lutaimDh.net
しかしGTK4が出てGTK2はEOLになった訳だが、ソースは公開されてるから永遠に使えるし、
別に自分の作るしょっぱいアプリなら見栄えとかも気にならない。
そりゃPython2が消えるのに時間かかるわけですわ。
896:デフォルトの名無しさん
20/12/25 22:27:48.26 ri6ukwlu.net
とりあえずlazbuildでlpiファイルを指定してやればコマンドラインでビルド出来るのが
わかった。
これで素直にemacsでのコーディングにチャレンジできますな。
897:デフォルトの名無しさん
21/01/04 00:32:46.18 UbmKQSc4.net
Lazarusからブランチされたと思しきCodeTyphon。
公式サイト見る限り、LazarusよりIDE環境は進んでそう。
URLﾘﾝｸ(www.pilotlogic.com)
898:デフォルトの名無しさん
21/01/04 08:44:40.23 yz1hRW6c.net
Lazarusはシングルウインドウになったらええのに
899:デフォルトの名無しさん
21/01/19 14:59:49.28 yIqZdVPk.net
FAQ見るとシングルウィンドウにするんだー、だからペインドッキングのパッチは
ノーセンキューなんて書いてあるのにねー。
GTK３サポート共々今どんな塩梅なんですかね。
900:デフォルトの名無しさん
21/01/19 20:51:23.69 yIqZdVPk.net
何を思ったかデスクトップPCをDebian/Linuxに、エディタはemacsでコーディングをしてる。
emacsのデフォルトはgnu-pascalサポートが入ってるのでObjectPascal拡張があると不便。
よくわからんまま、emacs delphi.elで検索かけてgithubにあるopacal.elを入れて
M-x opascal.elとしてみたら普通に動くようです。
そうまでしてなんでemacsで書かねばならんのかわからんのですが・・・
901:デフォルトの名無しさん
21/01/26 16:12:05.49 7DQrPYu1x
エンジニアが教えるの下手くそな理由を論理的に解説してみた【教育の本質】
URLﾘﾝｸ(www.youtube.com)
派遣エージェントの言う事は9割ウソである理由【カモられない方法】
URLﾘﾝｸ(www.youtube.com)
IT業界のヤバすぎる落とし穴5選
URLﾘﾝｸ(www.youtube.com)
絶対にエンジニアになってはいけない人とは【ハイクラス人材】
URLﾘﾝｸ(www.youtube.com)
【エンジニア】正社員/派遣社員/フリーランスのメリット・デメリットについて
URLﾘﾝｸ(www.youtube.com)
エンジニアはお金を追求してはいけないという年寄りを論破してみた
URLﾘﾝｸ(www.youtube.com)
プログラミングスクールを否定する老害どもについて
URLﾘﾝｸ(www.youtube.com)
WEBフリーランスで年収1000万円超えないのはどう考えてもおかしい
URLﾘﾝｸ(www.youtube.com)
エンジニアは技術力磨きすぎても金になりません
URLﾘﾝｸ(www.youtube.com)
902:デフォルトの名無しさん
21/02/27 11:50:38.32 /3KARqRa.net
Lazarus Release 2.0.12 - February 24, 2021, 09:03:56 pm
903:デフォルトの名無しさん
21/02/28 23:10:14.65 mKlp/j+j.net
あ、もう出てたんですね。
リリースノート見る限りバグフィックスが主体であんまし新機能はなさ気な雰囲気ですが
使ってみた方いかがでしょうか。
904:デフォルトの名無しさん
21/03/09 15:37:27.70 l78vZ82J.net
windows10 で lazarus 2.0.12 を利用していますが、以下のようなコードの２か所で修飾子エラーになります
{MODE Delphi} なら大丈夫なのですが {$mode objfpc} の場合、どのように変更すればよろしいのでしょうか
type
PPHashItem = ^PHashItem;
PHashItem = ^THashItem;
THashItem = record
Next: PHashItem;
Key: string;
Value: Integer;
end;
TStringHash = class
private
Buckets: array of PHashItem;
protected
function Find(const Key: string): PPHashItem;
end;
function TStringHash.Find(const Key: string): PPHashItem;
var
Hash: Integer;
begin
Hash := HashOf(Key) mod Cardinal(Length(Buckets));
Result := @Buckets[Hash];
while Result^ <> nil do
begin
if Result^.Key = Key then <--- この部分が修飾子エラー
Exit
else
Result := @Result^.Next; <--- この部分も修飾子エラー
end;
end;
905:デフォルトの名無しさん
21/03/09 18:54:46.70 rOOOnHPb.net
Result^ を Result^^ にすればいいんじゃね？
906:デフォルトの名無しさん
21/03/09 20:18:39.79 MhdCCkF1.net
>>905
上手く行きました
ありがとうございました
907:デフォルトの名無しさん
21/04/21 03:12:09.47 qzwIy4YRA
最高か！アプリ開発とアプリマーケティングをノーコードで実現するノーコード開発プラットフォーム
「Applica（アプリカ）」の提供を開始
URLﾘﾝｸ(prtimes.jp)
驚愕！SaaS開発をノーコードで実現するノーコード開発プラットフォーム「Jidoca（ジドウカ）」の提供を開始
URLﾘﾝｸ(prtimes.jp)
【入門】誰でもアプリを作れる時代が来た。噂の“ノーコード”を徹底解説
URLﾘﾝｸ(www.salesforce.com)
IT業界を変える可能性を秘める「ノーコード（NoCode）」とは
URLﾘﾝｸ(www.mdsol.co.jp)
【ノーコード】IT業界が根底から変わる、日本人の知らないノーコード開発アプリの衝撃
URLﾘﾝｸ(descartes-search.com)
急激に広まるノーコード、ローコードをうまく使いこなせ
URLﾘﾝｸ(ascii.jp)
30億円調達の簡単アプリ開発サービス「ヤプリ」が見つけた“鉱脈”
URLﾘﾝｸ(signal.diamond.jp)
プログラミング不要でアプリ開発を実現する「Yappli」を提供、ヤプリのIPOサマリー
URLﾘﾝｸ(media.startup-db.com)
ノーコードで世界は変わる
URLﾘﾝｸ(thebridge.jp)
908:デフォルトの名無しさん
21/05/22 19:39:35.52 WqI2sMHS.net
3.2.2リリースage
909:デフォルトの名無しさん
21/05/22 22:29:54.34 PvGX7Iml.net
まだ開発続いとったんかい
910:デフォルトの名無しさん
21/10/26 21:43:41.35 8mnatHSz.net
Delphiのライセンス切れてるし、Community Editionは毎回新バージョンに更新しないといけないから
これを機にFreePascalにしてみるか
貧弱なIDEはVSCodeで補えそうだし
911:デフォルトの名無しさん
22/01/08 18:10:12.68 +pfXixh3.net
Lazarus Release 2.2.0 - January 05, 2022, 11:57:19 pm
912:デフォルトの名無しさん
22/05/15 19:08:49.28 /ysfaPE8.net
program MyProgram(input, output);
のようにプログラム名にパラメーターが付いたコードを見かけました。
Pascalの方言なのでしょうか？
それともFree Pascalでも見られるものでしょうか？
913:デフォルトの名無しさん
22/05/22 12:24:51.68 Z7pvlCmg.net
>>912
質問に質問で返してすみませんが、あなたは
void int main( int argc, char *argc[])
はｃの方言だと思いますか？
それともGNUCでも見られるものでしょうか
914:デフォルトの名無しさん
22/05/22 13:54:17.54 AZNH+fge.net
void int mainってコンパイルエラーでは？
915:デフォルトの名無しさん
22/05/22 22:03:25.27 Z7pvlCmg.net
>>914
しまった(苦笑
916:デフォルトの名無しさん
22/05/24 12:07:51.00 /3mhcllS.net
Lazarus Release 2.2.2 - May 19, 2022, 09:26:08 am
917:デフォルトの名無しさん
22/05/26 19:00:16.04 9mlaCQEY.net
本家のForum にレジストしても確認メールが届きません。
どうしたものでしょうか。
迷惑メールとかも見ましたし再送信とかも試しましたががまったく来ません。
918:デフォルトの名無しさん
22/05/26 19:36:53.93 MuCsRUFl.net
抵抗されてるのかもね
919:デフォルトの名無しさん
22/09/30 02:46:22.20 NV97RnvW.net
Lazarus Release 2.2.4 - September 28, 2022, 10:08:10 am
920:デフォルトの名無しさん
22/10/04 15:58:36.29 i5Up1tp0.net
Windowsアプリの速度は改善したの？
921:デフォルトの名無しさん
22/10/18 09:21:39.14 muJtZzp1.net
Lazarus製のアプリケーションのexeのショートカットをつくって実行時の
大きさを最小化としても最小化で起動しないのだがどうすればいいのかな
922:デフォルトの名無しさん
22/10/19 00:06:57.42 imuHRl6B.net
>>921
Delphi ではプロジェクトファイルをごにょごにょしてたので
Lazarus では多分 .lpr ファイルにごにょごにょ
Application.CreateForm(TForm1, Form1);
//ここに↓これを入れて判断
if CmdShow = SW_MINIMIZE then Application.Minimize;
Application.Run;
923:デフォルトの名無しさん
22/10/19 09:56:54.13 ozKA7OU5.net
>>922
あいにく動作しませんでした
メインフォームのOnCreateイベントハンドラーに
case CmdShow of
SW_SHOWMINNOACTIVE: WindowState := wsMinimized;
SW_SHOWMAXIMIZED: WindowState := wsMaximized;
end;
と書いたらうまくいきました
924:デフォルトの名無しさん
22/10/20 08:50:49.47 rL6ktv6z.net
AmazonにKindle本として佐々木優という人が書いたLazurus・Free Pascalのセルフ出版の
本が何冊かのっている（読み放題のKindle Unlimited対象）
役に立つかどうかは別にして日本語の本というのはめずらしいかも
925:デフォルトの名無しさん
22/10/20 10:06:08.31 7LO4Bhg7.net
>>924
応援の意味で何冊か買いました。Unlimited もいつ対象外になるかわからんし。
926:デフォルトの名無しさん
22/10/22 14:34:30.76 4hbuG1Ym.net
UbuntuでC++Builderを導入できなかったのでDelphiの本読んで勉強してます。
思い通りに動くと楽しいです。
927:デフォルトの名無しさん
22/11/15 14:25:03.73 ktesV7KK.net
サンプルの xmlstreaming を参考にして設定を書き出す処理を作ってます。
TComponent を継承して設定データのクラスを作ろうとしているんだけど、
その中にさらに TComponent 派生クラスを入れ子にすると、その項目が書き出されない。
入れ子のクラスを TPersistent 派生にすると書き出されるんだけど、項目名が
ドットで区切られた形でかなり違和感。
xmlstreaming の中でコメントアウトされている Form (Self) を書き出す処理を有効にしてみると、
入れ子のデータは「children」タグに囲われていい感じで出力されているんだけど、
どうやればできるんでしょうか？
928:デフォルトの名無しさん
22/11/15 19:22:03.37 hFwj798Q.net
>>927
下記を付け加えると入れ子のデータも書き出された
読み込みが正常に行われるかは検証してない
procedure TMyComponent.GetChildren(Proc: TGetChildProc; Root: TComponent); //override;
var
i: Integer;
begin
if Self = Root then begin
for i:=0 to ComponentCount-1 do begin
Proc(Components[i]);
end;
end;
end;
929:デフォルトの名無しさん
22/11/15 21:41:42.06 hFwj798Q.net
Rootってなんだろう？と思って書いてたコードが入ってた
procedure TMyComponent.GetChildren(Proc: TGetChildProc; Root: TComponent); //override;
var
i: Integer;
begin
for i:=0 to ComponentCount-1 do begin
Proc(Components[i]);
end;
end;
930:デフォルトの名無しさん
22/11/15 22:24:52.25 1BrVYPVp.net
>>929
ありがとうございます。書き出せました。
wiki のストリーミングのところ読んでもそんなこと書いてなかったけどな。
TWinControl に実装されてるから Form ならちゃんと書き出されたんですな。
人をハメようとしてるとしか思えないな。検索しても、英語の情報でも全然ないし。
とにかく、ありがとうございました。
931:デフォルトの名無しさん
22/12/14 20:13:02.80 WtdZKbBc.net
これは壮観。過去50年以上にわたる「プログラミング言語の人気の変遷」をアニメで紹介するムービー【やじうまWatch】 - INTERNET Watch
s://internet.watch.impress.co.jp/docs/yajiuma/1463502.html
pascalって人気あったんだね
932:デフォルトの名無しさん
22/12/31 11:06:52.98 J7CUMtxq.net
インクリメンタルサーチの候補表示に TListBox を使っていて、
候補数が一定以下の場合は、数に合わせて ListBox の高さを調節したいと思っています。
Windows の場合は ItemHeight を使えばうまくいくようなのですが、Linux だと 0 が返ってきて
使えません。ほかにも ItemRect(0).Height の値も 0 ではないけど全然足りないし、
フォントの高さから計算できるかと思ったけど、同じ高さでもフォントが違うと
ListBox の項目の高さが微妙に違ったりしてこれもダメっぽい。
描画しているんだからどこかに情報があるんだと思うんですが、どこにあるんでしょう？
そもそもアプローチが間違っている？
933:デフォルトの名無しさん
23/01/07 18:23:08.22 rN0cn1Ph.net
TOpenDialogのTitleプロパティがデフォルトの「ファイルを開く」のままOpenDialog1.Executeを実行すると、表示されたダイアログのキャプションが"Open existing file"と英語で表示されてしまいます。
これはLCLStrConstsユニットで rsfdOpenFile = 'Open existing file'; と定義されているのが原因のようですが、これをlclstrconsts.ja.poの「ファイルを開く」に置き換える方法を教えてください。
934:デフォルトの名無しさん
23/01/09 20:44:35.21 uyXkOmJj.net
>>933
プロパティの設定が効かないってことかな？
935:デフォルトの名無しさん
23/01/10 09:05:22.16 GH/EYK1c.net
>>934
オブジェクトインスペクタでTitleを「画像ファイルを開く」など「ファイルを開く」以外にすればTitleがダイアログのキャプションに反映されます。
また、コードでOpenDialog1.Title := 'ファイルを開く'; を実行すればキャプションもそうなります。
ただ、コードを書かずにオブジェクトインスペクタで「ファイルを開く」を設定するだけだと「Open existing file」が表示されるというのが今回の問題です。
この症状はTDBNavigatorでも確認できていて、Hintsプロパティにはデフォルトで日本語のヒントが設定されているのにもかかわらず、実行すると英語のヒントが表示されてしまします。
その他MessageDlgのボタンが「はい」「いいえ」ではなく「Yes」「No」なのも同じ原因だと思います。
936:デフォルトの名無しさん
23/01/10 18:40:29.37 ddgJg6qa.net
>>935
IDEの言語を日本語にしていると、TOpenDialogのTitleプロパティを「ファイルを開く」に設定してもデフォルトとみなされ設定ファイルに記録されず
アプリを国際化対応させてないと元のデフォルトである 'Open existing file' が表示されるみたい
したがって
解決法１
IDEの言語を日本語以外にして Titleプロパティを「ファイルを開く」に設定する
他のダイアログなどでも設定しないとならなかったり、根本解決ではない
解決法２
国際化対応（のふり）：
１．どこかの uses節に DefaultTranslator を追加し、
２．実行ファイルがあるフォルダに languagesフォルダを作り、その中に lclstrconsts.ja.po をコピーする
でいいはずなんだけど、Windowsだと FCLの gettextユニットに日本語の言語コードを jp とする不具合があるので、次のように修正する
３．gettextユニットにある procedure GetLanguageIDs(var Lang, FallbackLang: string) の中の
LOCALE_SABBREVLANGNAME を LOCALE_SISO639LANGNAME に
LOCALE_SABBREVCTRYNAME を LOCALE_SISO3166CTRYNAME に書き換える
あとは gettextユニットをプロジェクトに追加してコンパイルするだけでいいはず
（gettextユニットを修正せずにファイル名を lclstrconsts.ja.po から lclstrconsts.jp.po にするだけでもいいけど）
gettextユニットの不具合のせいで国際化対応をどうやってもできなくて無駄に悩んだぞ
IDEの言語設定で Automaticで日本語にならないのも gettextユニットの不具合のせいじゃないのかなあ
937:デフォルトの名無しさん
23/01/10 19:51:57.80 GH/EYK1c.net
>>936
ありがとうございます。
lclstrconsts.jp.poにリネームする方法で試して無事日本語で表示されました。
TDBNavigatorのヒントとMessageDlgのボタンも同様です。
938:デフォルトの名無しさん
23/03/13 17:17:11.04 0W6r0BpQ.net
Lazarus Release 2.2.6 - March 09, 2023, 10:38:09 am
939:デフォルトの名無しさん
23/03/17 15:14:21.65 O04jxkPS.net
軽くていいな。ゲームエンジンなんかもあるようで欧州では使い手多いのか？
940:デフォルトの名無しさん
23/04/29 13:16:43.69 SIZVO/Fn.net
URLﾘﾝｸ(www.tiobe.com)
TIOBE Indexで常に10位前後を維持してるDelphi系のPascal言語もスゴいよな
信じがたい快挙
941:デフォルトの名無しさん
23/05/05 03:07:31.72 PeDEzH1k.net
Windowsアプリを作ったら、とても遅いような気がするんだけど、まだ改善してないのかな？
942:デフォルトの名無しさん
23/05/07 13:41:00.25 eh+8xa5M.net
>>941
どんなプログラムを書いてどの言語と比較して遅いのかを書かないと答えは無理
C++/C言語と同等の速度にはならない
スクリプト言語よりは高速
943:デフォルトの名無しさん
23/05/07 15:52:40.36 FtrFphzu.net
>>941
他のプログラムはサクサク動くのにお前の作ったプログラムだけが遅いという場合は、
多分お前のプログラムの何かがおかしい。
944:デフォルトの名無しさん
23/07/12 06:19:48.60 I6ZMSQN0.net
Lazarus Release Candidate 1 of 3.0 - July 03, 2023, 02:10:30 pm