Koder

Tags:    delphi

User
Bruger #332 @ 09.09.01 21:49
Jeg har ikke arbejdet så meget med programering men vil meget gerne selv lave kabaler og kortspil.
Jeg vil meget gerne have fat i nogle koder så jeg kan se hvordan de er bygget op og hvordan det hele hænger sammen.
Nogle gode råd og fif!!!

Mvh. Line



4 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Sorter efter stemmer Sorter efter dato
User
Bruger #4 @ 10.09.01 09:39
<quote>Jeg har ikke arbejdet så meget med programering men vil meget gerne selv lave kabaler og kortspil.
Jeg vil meget gerne have fat i nogle koder så jeg kan se hvordan de er bygget op og hvordan det hele hænger sammen.
Nogle gode råd og fif!!!

Mvh. Line</quote>

Prøv at finde nogle komponenter på torry.net !

Jeg mener bestemt at jeg har set nogle derinde...!

[.:Ossi:.]
--> Henrik Ossipoff Hansen
<-- InetSoft - We make your software!

Mail: mailto:Henrik.Ossipoff.Hansen@skolekom.dk
Hjemmeside: http://www.2001115.thinkquest.dk



User
Bruger #58 @ 10.09.01 16:59
>Hjemmeside: http://www.2001115.thinkquest.dk

Den URL er død (serveren findes ikke)

Niels
http://www.niller.f2s.com/ - always there...
http://g4s.dnsq.org/ - when I'm online!



User
Bruger #294 @ 11.09.01 13:35
Her er lidt koder som du kan lege lidt med:

Det forventes at du har installeret DLL-filen card32.dll i Windows -> System - mappen.
Alt i denne kode henter SPAR, RUDER etc. fra DLL-filen, så du ikke skal programmere det hele selv. Det gør Windows for dig.

//s7 er = Spar 7.

Var s7 : TCard;

s7:= TCard.create(SPADE,7, true);

begin
s7.FaceTurnDown; //Vend kortet.
s7.flip; //Denne koder vender kortet modtsat den vej den vender nu.
s7.GetValue; // Denne kode giver værdigen af s7;

c := TCard.create(SPADE,7,true); //Henter SPAR 7.

end;


Håber disse koder virker. Ellers så prøv at lege lidt med dem.

CyberLSN




User
Bruger #4 @ 11.09.01 20:59
<quote>>Hjemmeside: http://www.2001115.thinkquest.dk

Den URL er død (serveren findes ikke)

Niels
http://www.niller.f2s.com/ - always there...
http://g4s.dnsq.org/ - when I'm online!</quote>

Ups...! Et . for meget! Er nu rettet!

[.:Ossi:.]
--> Henrik Ossipoff Hansen
<-- InetSoft - We make your software!

Company: InetSoft

Mail: mailto:Henrik.Ossipoff.Hansen@skolekom.dk
Hjemmeside: http://www2001115.thinkquest.dk



t