/
Forside
/
Teknologi
/
Udvikling
/
Delphi/Pascal
/
Tip
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
Delphi/Pascal
#
Navn
Point
1
oldwiking
603
2
jrossing
525
3
rpje
520
4
EXTERMINA..
500
5
gandalf
460
6
gubi
270
7
DJ_Puden
250
8
PARKENSS
230
9
technet
210
10
jdjespers..
200
Brug "case" med string istedet numerisk.~
lavang har modtaget
-10
point for dette tip
Fra :
lavang
Vist : 1437 gange
Dato :
02-12-04 19:32
Her er en måde at bruge case statement med string istedet for numerisk...
//---------------------------------------------------//
function selectSTR(selector : string; caseList : array of string) : integer;
var
i : integer;
Found : Boolean;
begin
Found := False;
Result := -1;
i := - 1;
while not Found and (i < length(caseList)) do
begin
inc(i);
Found := CompareText(Sel, caseList[i]) = 0;
if Found then
Result := i;
end;
end;
{for eks.}
var
mySelector : string;
...
case selectSTR('Delphi', ['ASP', 'Delphi', 'PHP']) of
0 : mySelector := 'ASP';
1 : mySelector := 'Delphi';
2 : mySelector := 'PHP';
end;
...
//---------------------------------------------------//
Har du brug for yderligere info om at hvordan den skal bruges, kan du sende mig en email. Jeg skal nok uddybe det...
Hilsen
Lavang
Bedømmelse
Fra :
hbirk
Dato :
02-12-04 19:47
Bedømmelse
Fra :
invisible
Dato :
02-12-04 19:48
Bedømmelse
Fra :
return
Dato :
02-12-04 20:15
Bedømmelse
Fra :
CLAN
Dato :
02-12-04 20:26
Bedømmelse
Fra :
24timer
Dato :
02-12-04 21:25
Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip.
Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Alle emner
Teknologi
Udvikling
Delphi/Pascal
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177577
Tips :
31968
Nyheder :
719565
Indlæg :
6409070
Brugere :
218888
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.