MultiDialog4FMX

Delphi FMX에서는 가능한 한 간단하고 기본적인 대화와 멀티 플랫폼의 사용자 정의를 위한 간단한 솔루션을 제공합니다.
MultiDialog4FMX를 사용하면 사전에 오류가 발생하고 전문적인 대화를 허용하고 코드를 다시 활용하고 응답할 수 있으며 com 레이아웃과 플랫폼에 대한 이벤트 및 이벤트를 확인할 수 있습니다.

 

https://github.com/adrianosantostreina/MultiDialog4FMX

GitHub - adrianosantostreina/MultiDialog4FMX: Diálogos para Firemonkey Android, iOS e Windows

 

procedure TForm3.Button1Click(Sender: TObject);
begin
  TMultiDialog4FMX.Dialog
    .SetTitle('승인')
    .SetMessage(' 종료하시겠습니까?')
    .Buttons
      .AddButton('예', DoClickSim, TAlphaColorRec.Green)  // ✅ 버튼 색상을 초록색으로 변경하기
      .AddButton('아니오', DoClickNao, TAlphaColorRec.Brown)// ✅ 색상을 더 진한 빨간색으로 조정하기
      .AddButton('취소', DoClickTalvez) // ✅ 기본값: 회색 (Null)
    .&End
    .Show;
end;

예제와 같이 OnClick 또는 OnTap 이벤트를 생성하여 매개변수로 전달하십시오.

 

procedure TForm3.DoClickSim(Sender: TObject);
begin
  Label1.Text := ' 예 버튼 클릭 ';
end;

procedure TForm3.DoClickNao(Sender: TObject);
begin
  Label1.Text := ' 아니오 버튼 클릭 ';
end;

procedure TForm3.DoClickTalvez(Sender: TObject);
begin
  Label1.Text := '취소 버튼 클릭';
end;

 

이후, 초반 예시와 같이 AddButton 호출에 이벤트를 연결하십시오.
버튼 개수 제한: 최소 1개, 최대 3개. (컴파일 시 오류 없음, 실행 시 오류 발생 가능)
지원 플랫폼: Android (Windows 미지원, 첫 번째 버전 기준)