Jump to content


Photo

C++ Builder


  • Faça o login para participar
7 replies to this topic

#1 Blackbird

Blackbird

    Trying to be strong

  • Usuários
  • 480 posts
  • Sexo:Masculino
  • Localidade:São Paulo

Posted 10/03/2004, 23:42

Olá, estou a algum tempo desenvolvendo programas cientificos, e, ao programar um programa que calcula perímetro, lados, angulos e soma dos angulos de um triângulo por coordendas cartesianas, me dei conta que que eu necessitava de um botão com função OnClick de limpar os dados de uma verificação anterior para uma outra verificação. Segue anexado um ss de meu programa e ao lado do botão calcular, gostaria de implantar um botão Limpar para que esse limpasse todos os Edits para podermos elaborar um novo calculo sem ter que fechar o programa ou limpar todas os Edits.

Gostaria de aber como faço para riar um botão e ele ter essa função de limpeza.

Agradeço desde já a ajuda.

Abraços.

Attached Files


Posted Image

Another star, has fallen without sound ...


#2 Blackbird

Blackbird

    Trying to be strong

  • Usuários
  • 480 posts
  • Sexo:Masculino
  • Localidade:São Paulo

Posted 24/03/2004, 19:40

Bom galera, ninguém respondeu, então, por eu ter aprendido imaginei que alguns possuiam a mesma dúvida que eu, então resolvi compartilhar com vcs:

bom, supondo que o seu form tenha 3 edit e 1 memo, vc criara um botão e escreverá Limpar, deletar, ou algo to tipo e por a seguinte função no OnClick:

void_fastcall ..................
{
Memo1->Clear();
Edit1->Clear();
Edit2->Clear();
}


Assim vc fará com todos os elementos de seu form, e tamb'm, se apor a limpeza, vc qr que o ponteiro de escrita vá parar em deterinado edit, vc coloca antes da ulma chave:

Edit1->Setfocus();


Esse é o código.

E, aproveitando o embalo, se quiserem criar um botão com função de fechar seu programa, cria um botão com o caption Sair, Fechar, ou algo do gênero e em sua função OnClick, ponha:

void_fastcall...............
{
Form1->Close();
}


É isso aí galera espero que isso seja de bom uso a vocês.

Abraços.

Posted Image

Another star, has fallen without sound ...


#3 HaroNism

HaroNism

    Super Veterano

  • Usuários
  • 13822 posts
  • Sexo:Masculino
  • Localidade:San Miguel de Tucuman

Posted 20/09/2017, 15:07

Propecia Success Stories online pharmacy Buy Tadalafil Citrate Liquid Amoxicillin Dosage 875 Mg Viagra Apres Prostatectomie Propecia Kidney Damage cialis price Kamagra Oral Jelly How To Take
Acheter Du Baclofene cialis buy online Sourceofprednisone
Best Price Viagra 100mg Costco
Letrozole For Sale <a href=http://cialtobuy.com>cialis</a> Side Effects Long Term Propecia Finasteride

#4 RonsisM

RonsisM

    Super Veterano

  • Usuários
  • 15724 posts
  • Sexo:Masculino
  • Localidade:Plovdiv

Posted 12/10/2017, 15:21

Buy Viagra Online Paypal Uk Propecia Hair Growth Propecia Calendario cheap levitra canada Como Comprar Levitra Sin Receta Zithromax Buy Cheap Propecia Grande

#5 HaroNism

HaroNism

    Super Veterano

  • Usuários
  • 13822 posts
  • Sexo:Masculino
  • Localidade:San Miguel de Tucuman

Posted 21/10/2017, 01:28

Zithromax Three Day Pack Amoxicillin Cause Gas generic levitra 40 mg Achat Cytotec Sur Internet
Viagra 24 Hours Delivery Amoxicillin For Canines Buy Cialis 20mg Europe levitra plus Buy Brand Viagra Us Viagra Comprare Line Cialis 5 Mg Doctissimo

#6 Miguceamma

Miguceamma

    MiguPenjisse

  • Usuários
  • 11724 posts

Posted 22/10/2017, 23:25

El Cialis Sin Receta Viagra For Sale In Canada Levitra Pills generic cialis Propecia Nioxin Treatment

#7 RonsisM

RonsisM

    Super Veterano

  • Usuários
  • 15724 posts
  • Sexo:Masculino
  • Localidade:Plovdiv

Posted 31/10/2017, 10:59

Zithromax For Cough Discount cheapeast isotretinoin purchase in internet overseas pharmacy Finasteride On Line viagra Viagra Tipi
Buy Generic Orlistat 120mg Online Acheter Cialis Forum viagra Levitra Acheter En Baisse Comment Faire Pour Obtenir Priligy Cialis Soft Tabs De
Il Viagra Femminile Provoca Sonnolenza Surdosage Cheap Cialis Online Legit India vardenafil in osterreich erhaltlich Cialis Toulouse Cheter Baclofene En Ligne
Effets Secondaires Cialis 20 viagra Buy Valtrex Cheap Online Best Lisinopril No Prescription Canada
Where to buy generic isotretinoin isotrex shop Who Will Deliver Cialis Fast online pharmacy Propecia 1 4

#8 HaroNism

HaroNism

    Super Veterano

  • Usuários
  • 13822 posts
  • Sexo:Masculino
  • Localidade:San Miguel de Tucuman

Posted 07/11/2017, 18:51

Cialis Stripes Erfahrungen Priligy Forum 2010 cialis Buy Diflucan Online Cheap Mifepristone Acheter
Is Amoxicillin An Acid Or Base Stendra Priligy Zithromax Purchase cheap cialis Magasin Levitra 20mg
Valacyclovir Hcl 1 Gram Tablet Cheap Viagra Uk Next Day Delivery viagra Cealis India




0 user(s) are reading this topic

0 membro(s), 0 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq