Q&A
実現したいこと
'Hello World !'と最初からウインドウに表示したいのです。
前提
Delphiを触り始めたばかりの超初心者です。
いわゆる「Hello World !」をやりたいのですができません。
発生している問題・エラーメッセージ
なし
該当のソースコード
Delphi
1unit Unit2; 2 3interface 4 5uses 6 Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, 7 Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls; 8 9type 10 TForm2 = class(TForm) 11 Label1: TLabel; 12 procedure Label1Click(Sender: TObject); 13 private 14 { Private 宣言 } 15 public 16 { Public 宣言 } 17 end; 18 19var 20 Form2: TForm2; 21 22implementation 23 24{$R *.dfm} 25 26procedure TForm2.Label1Click(Sender: TObject); 27begin 28 Label1.Caption := 'Hello World !'; 29end; 30 31end. 32
試したこと
上記のコードの場合、実行するとウインドウには'Label1'と表示されていて、それをクリックしたら'Hello World !'と変化します。
クリックやダイアログを表示したりしないで、最初から'Hello World !'と表示させたいのです。
他には、Captionの代わりにTextを使っても同じでした。
ダイアログを一旦表示してからその中に'Hello World !'と表示することは別のコードでできました。
多分、
procedure TForm2.Label1Click(Sender: TObject);
の部分を何かに書き換えればいいのだと思いました。
そこで、ネット上の記事を探してみましたが、ダイアログを表示させるやりかたと、ボタンを配置するやりかたしか見つかりませんでした。
書籍も見てみましたが、やっと'Hello World !'に近いものを見つけましたが、カーソルの座標を表示するもので「FormMouseMove」を使っていて、やはりカーソルを動かすというアクションが必要なコードでした。
補足情報(FW/ツールのバージョンなど)
Delphi 10.4 Community Edition
Windows 10 Home 22H2
回答1件
下記のような回答は推奨されていません。
このような回答には修正を依頼しましょう。
2023/02/03 06:49
2023/02/03 06:53
2023/02/03 06:55