Fórum Checkbox Delphi #592268

08/04/2018

0

Bom eu criei checkbox's com opções exemplo
Time
Tempo

quando a pessoa marcar o checkbox eu quero que apareça um texto no memo1 tipo, "Você marcou a opção Time" .

como faço isso?
Fábio Martins

Fábio Martins

Responder

Posts

08/04/2018

Raimundo Pereira

R *.dfm}

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
VerificaCK;
end;

procedure TForm1.CheckBox2Click(Sender: TObject);
begin
VerificaCK;
end;

procedure TForm1.VerificaCK;
begin
if CheckBox1.Checked=true then
Memo1.Lines.Add('Você marcou a opcao Time');

if CheckBox2.Checked=true then
Memo1.Lines.Add('Você marcou a opcao Tempo');


end;


Responder

Gostei + 0

08/04/2018

Fábio Martins

Posso aproveitar e perguntar outra coisa como faço para quebrar linha? no mesmo memo tipo

Memo1.Lines.Add('Você marcou a opcao Tempo
tempo 2
tempo 3

');

assim não vai, tem como quebrar a linha no memo.add?
Responder

Gostei + 0

08/04/2018

Raimundo Pereira

if CheckBox1.Checked=true then
Memo1.Lines.Add('Você marcou a opcao');
Memo1.Lines.Add('tempo 2');

if CheckBox2.Checked=true then
Memo1.Lines.Add('Você marcou a opcao');
Memo1.Lines.Add('tempo 3');
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar