begin process at 2012 02 14 11:50:39
  Trouver un code source :
 
dans
 

27 commentaire(s) de cavalier2400 sur des sources sur tout CodeS-SourceS

Déposé sur Captcha php simple

Merci, j'ai placé la captcha sur mon site, mais je reçois ce message d'erreur avertissement session_start()...Cannot send session cache limiter - headers already sent; mais au niveau de mon ordinateur local je ne reçois aucune erreur.
J'ai utilisé le code sans aucune modification, (mon lien http://guelmachess.net/livreor.php), merci
Posté le : 25/04/2011 09:42:41

Déposé sur Creation automatique sommaire

Bonsoir, je n'arrive pas placer this sommaire en bas de bas page, merci pour votre aide.
Posté le : 05/09/2010 16:35:40

Déposé sur Moteur de recherche

Merci
Posté le : 31/08/2010 22:28:09

Déposé sur Annonce d'évênements par calendrier en 2 fichiers

Re-Bonjour, En réalisant un outils pour ajouter des messages, avec les divers switchs valides, par coincidences j'étais tombé sur l'erreur, et il fonctionne sous IE.
Posté le : 28/08/2010 19:05:10

Déposé sur Annonce d'évênements par calendrier en 2 fichiers

Bonjour merci, programme très intéressant, et très pratique, que je désire exploiter sur mon bureau, mais il ne tourne que sous firefox, sous Internet explorer il n'ya aucun affichage de l'agenda, je sais que c'est possible de la faire fonctionner sous IE, je débute en javaScript.

Merci.
Posté le : 28/08/2010 18:31:23

Déposé sur Md5 relation reciproque

Le codage est claire du genre consonne voyelle... comme le bon vieux jeux bien connu, mais en réinventa pas enigma pour autant... tandis que l'autre partie ce sont les chiffres, et si on veut plus compliquer, alors c'est l'un dans l'autre, les tables hash et avec un bon metaxa on y arrivera.(merci pour ce code qui ouvre la porte à toute sorte modification, et merci pour ces commentaires... je débute en PHP je découvre md5 ainsi que les SHA... que d'autres languages n'offrent pas).
Posté le : 11/08/2010 19:23:09

Déposé sur Une fiche sans barre de titre

Merci pour le bel programme, mais je n'arrive pas à réaliser certaines fonctionnalité, comment fermer la fiche crée, sans passer par un bitbutton.
(j'ai essayé, close, free, destroy, mr-résults) sans résultat. Merci
Posté le : 23/07/2009 16:55:26

Déposé sur Datetimepicker : ajout de fonctions

il y'a de fct dans DateUtils pour le choix du 1er Jours de la semaine, j'utilise ces deux fonctions pour mon agenda de bureau, et je réussi le décalage, puisque le week end ici est un vendredi.
jw// est le jour de la semaine
y //est la date courante du date time picker // le décalage des semaines se fait toujours à partir du lundi jour numéro un...

placer les divers labels pour tester,

     procedure testj( d:string);
     var js1:integer;
     begin
     rdv1.Monthcalendar1.date:= strtodate(d);
     if dayoftheweek(rdv1.Monthcalendar1.date - 5) >0 then js1:= dayoftheweek(rdv1.Monthcalendar1.date - 5)
     else js1:= js1+2;
     jw:=js1;
     end;
    procedure cadrelejour();
    begin
   testj(datetostr(rdv1.monthcalendar1.Date));
   if weekof(rdv1.monthcalendar1.Date+2)= weekof(date()+2) then

begin
testj(datetostr(date()));
if  jw=1 then begin
rdv1.label12.Font.Color  := clwhite; rdv1.label12.Transparent := false; rdv1.label12.Color := clblack;
end ;

if  jw=2 then begin
rdv1.label13.Font.Color  := clwhite;rdv1.label13.Transparent := false; rdv1.label13.Color := clblack;
end ;

if  jw=3 then begin
rdv1.label14.Font.Color  := clwhite; rdv1.label14.Transparent := false; rdv1.label14.Color := clblack;
end ;

if  jW=4 then begin
rdv1.label15.Font.Color  := clwhite; rdv1.label15.Transparent := false;rdv1.label15.Color := clblack;
end;

if jw=5 then begin
rdv1.label16.Font.Color  := clwhite;  rdv1.label16.Transparent := false; rdv1.label16.Color := clblack;
end;

if  jw=6 then begin
rdv1.label17.Font.Color  := clwhite;  rdv1.label17.Transparent := false; rdv1.label17.Color := clblack;
end ;

if  jw=7 then begin
rdv1.label18.Font.Color  := clwhite;rdv1.label18.Transparent := false; rdv1.label18.Color := clblack;
end;  end;   end;



procedure affectiondesjours(d:string) ;

begin
begin
testj(d);
  y:= (datetostr(rdv1.MonthCalendar1.Date)) ;
//------------1-------SAMEDI
if jw=1 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack;label14.Transparent := true; label12.Caption := inttostr(dayof(strtodate(y)+0));
label13.Caption := inttostr(dayof(strtodate(y)+1));label14.Caption := inttostr(dayof(strtodate(y)+2));
label15.Caption := inttostr(dayof(strtodate(y)+3)); label16.Caption := inttostr(dayof(strtodate(y)+4));
label17.Caption := inttostr(dayof(strtodate(y)+5)); label18.Caption := inttostr(dayof(strtodate(y)+6));
dbgrid1.SetFocus ;
end;
end;

//------------2-------DIMANCHE
if jw=2 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack; label14.Transparent := true; label12.Caption := inttostr(dayof(strtodate(y)-1));
label13.Caption := inttostr(dayof(strtodate(y)+0));  label14.Caption := inttostr(dayof(strtodate(y)+1));
label15.Caption := inttostr(dayof(strtodate(y)+2)); label16.Caption := inttostr(dayof(strtodate(y)+3));
label17.Caption := inttostr(dayof(strtodate(y)+4)); label18.Caption := inttostr(dayof(strtodate(y)+5));
dbgrid2.SetFocus ;
end; end;

//------------3-------Lundi
if jw=3 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack;label14.Transparent := true;label12.Caption := inttostr(dayof(strtodate(y)-2));
label13.Caption := inttostr(dayof(strtodate(y)-1)); label14.Caption := inttostr(dayof(strtodate(y)+0));
label15.Caption := inttostr(dayof(strtodate(y)+1)); label16.Caption := inttostr(dayof(strtodate(y)+2));
label17.Caption := inttostr(dayof(strtodate(y)+3));  label18.Caption := inttostr(dayof(strtodate(y)+4));
dbgrid3.SetFocus ;
end;
end;

  //------------4-------Mardi
if jw=4 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack;label14.Transparent := true; label12.Caption := inttostr(dayof(strtodate(y)-3));
label13.Caption := inttostr(dayof(strtodate(y)-2)); label14.Caption := inttostr(dayof(strtodate(y)-1));
label15.Caption := inttostr(dayof(strtodate(y)+0)); label16.Caption := inttostr(dayof(strtodate(y)+1));
label17.Caption := inttostr(dayof(strtodate(y)+2)); label18.Caption := inttostr(dayof(strtodate(y)+3));
dbgrid4.SetFocus ;
end;
end;
   //------------5-------Mercredi
if jw=5 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack;label14.Transparent := true;label12.Caption := inttostr(dayof(strtodate(y)-4));
label13.Caption := inttostr(dayof(strtodate(y)-3));label14.Caption := inttostr(dayof(strtodate(y)-2));
label15.Caption := inttostr(dayof(strtodate(y)-1));label16.Caption := inttostr(dayof(strtodate(y)+0));
label17.Caption := inttostr(dayof(strtodate(y)+1)); label18.Caption := inttostr(dayof(strtodate(y)+2));
dbgrid5.SetFocus ;
end;
end;
//------------6-------jeudi
if jw=6 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack; label14.Transparent := true;label12.Caption := inttostr(dayof(strtodate(y)-5));
label13.Caption := inttostr(dayof(strtodate(y)-4)); label14.Caption := inttostr(dayof(strtodate(y)-3));
label15.Caption := inttostr(dayof(strtodate(y)-2)); label16.Caption := inttostr(dayof(strtodate(y)-1));
label17.Caption := inttostr(dayof(strtodate(y)+0)); label18.Caption := inttostr(dayof(strtodate(y)+1));
dbgrid6.SetFocus ;
end;
end;
//------------7-------Vendredi
if jw=7 then
begin
with rdv1 Do
begin
label14.Font.Color  := clblack; label14.Transparent := true;  label12.Caption := inttostr(dayof(strtodate(y)-6));
label13.Caption := inttostr(dayof(strtodate(y)-5));label14.Caption := inttostr(dayof(strtodate(y)-4));
label15.Caption := inttostr(dayof(strtodate(y)-3)); label16.Caption := inttostr(dayof(strtodate(y)-2));
label17.Caption := inttostr(dayof(strtodate(y)-1)); label18.Caption := inttostr(dayof(strtodate(y)+0));
dbgrid7.SetFocus ;
end; end;  end; end;
Posté le : 14/07/2009 09:39:52

Déposé sur Réduction de l'application : utilisation des messages de fenêtre

Bonsoir,

C'est toute l'application qui se place sur la barre des taches, à la ligne 5 j'aurais bien aimé lire Tvotreform et non votreform. merci, je cherche toujours comment placer une form sur la barre des tâches windows.
Posté le : 03/07/2009 21:00:09

Déposé sur Volumesystray: ouvrir sndvol32.exe plus rapidement que windows

Ben chez moi j'arrive à descendre toutes les barres de défilement à fond, et je suis sous SP2 ...

Je l'ai aussi testé sous xp-Familliale(Portable), tout est OK.


Cordialement,
Posté le : 27/08/2008 12:19:38

1 2 3


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,203 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales