cdurootsman
Messages postés3Date d'inscriptionjeudi 23 avril 2009StatutMembreDernière intervention29 avril 2009
-
29 avril 2009 à 12:27
cs_rt15
Messages postés3874Date d'inscriptionmardi 8 mars 2005StatutModérateurDernière intervention 7 novembre 2014
-
8 mai 2009 à 21:13
Bonjour, merci a tout ceux qui s'interresseront a mon probleme!
Voila je suis en train de créer un Useform sous Microsoft Visual Basic 2008 Express. Dans ce Form il y a déjà plusieurs panel et dans l'un d'eux 2 checkbox
Sachant qu'il faudrait que les 2 puissent apparaitre en meme temps, l'un en dessous de l'autre.
Je travails avec Visual Basic 2008 Express car je ne connais pas grand chose a la prog, alors si vous me conseillez de passer par les codes pour réaliser mon projet, expliquer moi bien la signification des choses! (histoire que j'apprenne des choses pas la meme occasion^^)
Merci d'avance a tout le monde, demander moi si il vous manque des infos.
A+++
krimog
Messages postés1860Date d'inscriptionlundi 28 novembre 2005StatutMembreDernière intervention14 février 201549 29 avril 2009 à 12:33
Salut
Comme indiqué dans ma signature, "Le Bar" n'est PAS un langage de programmation.
En l'occurrence, il s'agit de VB, alors www.vbfrance.com est fait pour toi.
Krimog : while (!(succeed = try())) ;
- NON, "LE BAR" n'est PAS un langage de programmation ! -
krimog
Messages postés1860Date d'inscriptionlundi 28 novembre 2005StatutMembreDernière intervention14 février 201549 29 avril 2009 à 15:13
Pas trouvé :'(
Mais il est clair que LPL (pas DPL, à moins que je n'aie pas compris) peut gérer différentes syntaxes, car c'est un langage utilisé par des développeurs C++, C#, Java, PHP, VB, Javascript et j'en passe.
En revanche, c'est un langage si compliqué que les problèmes rencontrés dedans sont loin de représenter une proportion négligable des messages de CS.
Bon, voici un résumé
public DrinkGlass AskForDrink(Client client, String drinkName)
{
try
{
Reserve.Connect();
Drink drink = Reserve.FindDrink("drinkName");
if (drink == null) throw new Exception("J'ai pas !");
if (client.Money < drink.Cost) throw new Exception("La maison ne fait pas crédit !");
DrinkGlass glass = drink.GetCorrectGlass();
if (glass.Capacity > drink.Quantity) throw new Exception("J'ai plus !");
client.Money -= drink.Cost;
this.Money += drink.Cost;
glass.Fill(drink);
return glass;
}
catch
{
throw new Exception("Merde, j'arrive pas à ouvrir cette bouteille !");
}
finally
{
Reserve.Close();
}
}
Bon, ça c'est s'il n'y a qu'un serveur. S'il y en a plusieurs, il faut faire des lock et tout...
Krimog : while (!(succeed = try())) ;
- NON, "LE BAR" n'est PAS un langage de programmation ! -
Bacterius
Messages postés3792Date d'inscriptionsamedi 22 décembre 2007StatutMembreDernière intervention 3 juin 201610 29 avril 2009 à 15:21
Oui désolé LPL lol faute de frappe.
Pour résoudre les lock :
function LockServer(ServerID: Integer): Boolean;
Var
hMutex: Longword;
S: Longword;
begin
Result := False;
if AlreadyLocked then raise Exception.Create('Non, quelqu''un d''autre s''occupe déjà de lui !');
S := GetTickCount;
while not AlreadyLocked do
begin
if GetTickCount - S > 5000 then raise Exception.Create('Trop long, je me casse !');
hMutex := CreateMutex('Ma drink', False, nil);
AlreadyLocked :(GetLastError ERROR_ALREADY_EXISTS);
end;
cs_rt15
Messages postés3874Date d'inscriptionmardi 8 mars 2005StatutModérateurDernière intervention 7 novembre 201413 8 mai 2009 à 21:13
Salut,
Bon cdurootsman, tu as constaté que si tu postes dans le bar et pas dans un thème vbfrance, tu obtiens surtout des réponses hors sujet...
Merci de poster au bon endroit la prochaine fois.