AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Case Frage

Ein Thema von HW764 · begonnen am 20. Aug 2004 · letzter Beitrag vom 20. Aug 2004
Antwort Antwort
HW764
(Gast)

n/a Beiträge
 
#1

Case Frage

  Alt 20. Aug 2004, 14:24
Ich hab eine Combobox.
In dieser stehen 5 Strings also 1 2 3 4 und 5.
Text ist 1. Wenn ich also zB. 3 auswähle soll stehen:
"Sie haben nummer 3 ausgewählt", mit den anderen auch.

Gruss HW764

so gehts net:

Delphi-Quellcode:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin

if combobox1.Text := ('1')
then showmessage ('Sie haben Nummer 1 gewählt')
end;

if combobox1.Text := ('2')
then showmessage ('Sie haben Nummer 2 gewählt')
end;
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#2

Re: Einfache Frag

  Alt 20. Aug 2004, 14:26
Hi,


bitte ändere erstmal den Titel, damit man die besser helfen kann.


Zum Thema:

Delphi-Quellcode:
case Combobox1.ItemIndex of
  0: ShowMessage('Sie haben null gewählt');
  1: ShowMessage('Sie haben 1 gewählt');
...
end;

[edit] Delphitags vergessen [/edit]
  Mit Zitat antworten Zitat
Mr Whoopee

Registriert seit: 28. Jun 2004
73 Beiträge
 
#3

Re: Einfache Frag

  Alt 20. Aug 2004, 14:27
Machs so:

Code:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
ShowMessage('Du hast "'+ComboBox1.Text+'" ausgewählt!');
end;
MfG Whoopee
  Mit Zitat antworten Zitat
angos

Registriert seit: 26. Mai 2004
Ort: Rheine
549 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: Case Frage

  Alt 20. Aug 2004, 14:28
oder nehm einfach mal die Doppelpunkte raus, bei den If - Abfragen
Ansgar
  Mit Zitat antworten Zitat
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#5

Re: Einfache Frag

  Alt 20. Aug 2004, 14:28
Zitat von Mr Whoopee:
Machs so:

Code:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
ShowMessage('Du hast "'+ComboBox1.Text+'" ausgewählt!');
end;
MfG Whoopee
Wenn er aber noch was machen will, ist Case besser.
  Mit Zitat antworten Zitat
Mr Whoopee

Registriert seit: 28. Jun 2004
73 Beiträge
 
#6

Re: Case Frage

  Alt 20. Aug 2004, 14:29
Zitat von angos:
oder nehm einfach mal die Doppelpunkte raus, bei den If - Abfragen
lol ^^ stimmt...

:= --> zuweisung
= --> vergleich


MfG Whoopee
  Mit Zitat antworten Zitat
Mr Whoopee

Registriert seit: 28. Jun 2004
73 Beiträge
 
#7

Re: Einfache Frag

  Alt 20. Aug 2004, 14:30
Zitat von Spider:
Zitat von Mr Whoopee:
Machs so:

Code:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
ShowMessage('Du hast "'+ComboBox1.Text+'" ausgewählt!');
end;
MfG Whoopee
Wenn er aber noch was machen will, ist Case besser.
yo seh ich auch gerade... hm.. als ich geantwortet habe was dei zusatz noch nciht da
naja, wie er es macht ist ja dann seine sache
  Mit Zitat antworten Zitat
Mr Whoopee

Registriert seit: 28. Jun 2004
73 Beiträge
 
#8

Re: Case Frage

  Alt 20. Aug 2004, 14:32
Zitat von HW764:
gehts net:

Delphi-Quellcode:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin

if combobox1.Text := ('1')
then showmessage ('Sie haben Nummer 1 gewählt')
end;

if combobox1.Text := ('2')
then showmessage ('Sie haben Nummer 2 gewählt')
end;
wieso hast du da noch ein end; hingesetzt, obwohl du kein begin zusätzulich geschrieben hast?
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:34 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz