Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi if abfrage auf label (https://www.delphipraxis.net/24093-if-abfrage-auf-label.html)

aerotech 15. Jun 2004 11:41


if abfrage auf label
 
Hi Leute, wie kann ich einem Label eine If Abfrage zuweisen!?

Sprich wenn angeklickt ist, dann soll showmessage!

Delphi-Quellcode:
if DBText1.Caption = true then showmessage('bla');
if DBText1.Text = true then showmessage('bla');
if DBText1.Name = true then showmessage('bla');
if DBText1 = true then showmessage('bla');
funtzt alles nit! :/

[edit=sakura] [delphi]Tags Mfg, sakura[/edit]

Matze 15. Jun 2004 11:44

Re: if abfrage auf label
 
Das sind auch keine boolschen Werte, sondern Strings.

Delphi-Quellcode:
if DBText1.Caption = 'irgendwas' then showmessage('bla');

Edit: Mist, hab gerade gesehen, dass es darum geht, ne MessageBox erscheinen zu lassen, wenn's angeklickt ist...

sakura 15. Jun 2004 11:47

Re: if abfrage auf label
 
Zitat:

Zitat von aerotech
Sprich wenn angeklickt ist, dann soll showmessage!

Dann schaue Dir mal das OnClick Ereignis der TDBText Komponente im Explorer an. Darin schreibst Du:
Delphi-Quellcode:
procedure TfrmMain.DBText1Click(Sender: TObject);
begin
  ShowMessage('So einfach ist das');
end;
...:cat:...

aerotech 15. Jun 2004 11:51

Re: if abfrage auf label
 
Danke geht, und was ist, wenn ich wissen will ob in der Tablle meiner Datenbank eine 1 drin steht!?

if tquizfragen.FieldByName('L1').AsBoolean = 1 then showmessage('bla');

funzt nit :/

sakura 15. Jun 2004 11:54

Re: if abfrage auf label
 
Für neue Fragen bitte einen neuen Thread eröffnen.
* * * LOCKED * * *


...:cat:...


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:44 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz