Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi If Anweisung (https://www.delphipraxis.net/23908-if-anweisung.html)

aerotech 11. Jun 2004 20:10


If Anweisung
 
Hi, sagt mal, wie muss die If Anweisung lauten...wenn ich jetzt ein Button habe...man draufklickt soll er gucken,..wenn im TabelleA-SpalteA der Datenbank A ne' 0 drinne steht, dann soll n' showmessage kommen, wenn in TabelleA-SpalteA jedoch ne' 1 drinne steht, soll ein durch Radomize eine zufällige neue ID ausgewählt und ausgegeben werden.

Hoffe ihr könnt mich verstehen...! ;)

jAcK oRsEn 11. Jun 2004 20:24

Re: If Anweisung
 
randomize;

...

if TabelleASpalteA = 0 then ShowMessage('blabla');
if TabelleASpalteA = 1 then random(zahl);

aerotech 12. Jun 2004 14:35

Re: If Anweisung
 
Liste der Anhänge anzeigen (Anzahl: 1)
hmmm, das funzt irgendwie nicht, also um es nochmal besser vor augen zu haben: (s. Dateianhang)

So sieht meine Tabelle aus. Durch ein Randomize wird in der Spalte ID ne' zufällige Zahl und dessen zugehörigen Frage ausgewählt und ausgegeben. Natürlich kommen dann auch die passenden Antwortmöglichkeiten hinzu. Nun soll man wenn man auf den Button klickt noch wissen, ob die Frage richtig beantwortet wurde, 0=Falsch ~ 1=Richtig.

Also,

if in dieser Tabelle Spalte L1 eine 0 drine ist showmessage
if in dieser Tabelle Spalte L1 eine 1 drine ist richtig, nächste frage wieder neue id mit random aussuchen!

rocksoft 12. Jun 2004 14:45

Re: If Anweisung
 
Hallo Aerotech,

ich würde es nicht auf die spalte fixieren sondern an dein Datensatz der gerade positiniert ist.

if DeineDB.FieldByName('deinfeld').AsBoolean = True then mach dies...
else
showmessage...


mfg Robert

aerotech 12. Jun 2004 14:53

Re: If Anweisung
 
Zitat:

Zitat von rocksoft
Hallo Aerotech,

ich würde es nicht auf die spalte fixieren sondern an dein Datensatz der gerade positiniert ist.

if DeineDB.FieldByName('deinfeld').AsBoolean = True then mach dies...
else
showmessage...


mfg Robert

erstmal danke für die schnelle antwort,...aber bei dem then sagt der mir jetzt: [Warning] Unit1.pas(204): Unsafe type 'PChar'

was kann ich darunter verstehen!?

jAcK oRsEn 12. Jun 2004 15:14

Re: If Anweisung
 
der tabelleninhalt ist nicht vom typ boolean

aerotech 12. Jun 2004 15:47

Re: If Anweisung
 
sondern!? (ich weiß, hab noch viel zu lernen)

aerotech 12. Jun 2004 15:49

Re: If Anweisung
 
Zitat:

Zitat von aerotech
sondern!? (ich weiß, hab noch viel zu lernen)

ist eigentlich n' einfacher text

rocksoft 12. Jun 2004 16:21

Re: If Anweisung
 
Hallo Aerotech,

oder du machst

aus dein tabelleninhalt typ ein boolean

oder

if DeineDB.FieldByName('deinfeld').AsString = 'Ja' then mach dies...
else
showmessage...

dann musste es gehen

rocksoft 12. Jun 2004 16:23

Re: If Anweisung
 
ups.. der posting ist jetzt 3 mal da, sorry


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:24 Uhr.
Seite 1 von 2  1 2      

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