くだすれDelphi(超初心者用)その58【Embarcadero】

[375 デフォルトの名無しさん 2020/12/22(火) 23:00:27.49 ID:DcJOv48F]

画像ファイルを読んで、画像にファイル名を描画して別名で保存というプログラムを作ってるんだけど
フォーム上に
TImage、TButton1、TButton2、TButton3、その他

�@Button1Click
begin
Image1.Picture.LoadFromFile(ファイル名);
end;

�AButton2Click
begin
with Image1.Canvas do
begin
Brush.Style:=bsClear;
font.Color:=clRed;
font.Size:=20;
TextOut(50, 50, ファイル名);
end;
end;

�BButton3Click
begin
Image1.Picture.SaveToFile(ファイル別名);
end;

で、�@�Aはうまくいくけど�Bは�@で読み込んだ画像がそのまま出力されるだけで、�Aで書き込んだ（はずの）
ファイル名が書き込まれていない。画面には表示されてるのに。

何が間違ってますかね。
RadStudioCommunityとLazarusです。