Mettre à jour les calcul d'une table à partird'une autre avec 2 ligne de prog seulement
Solutions:1. utiliser le TEmbeddedWB de www.euromind.com Fixer la propriété fpExceptions à false2. utiliser le TWebBrowser- Appeler la fonction dans OnCreate ou InitialisationSet8087CW($133F);
Delphi +DBASE+ RaveReport + CodeBarreDésoler pour le tuto 'tutoRaveBarre_code.pdf' ; il fait 1427 Ko a lui seul; je n'ai pas pu le posterVoila si vous avez un problême concernantRave...
// Placer sur la TForm: 1 TEdit, 2 TButtons, 1 TWebbrowser const NotAllowed: set of Char = ['"'] + ['/'] + [''] + ['?'] + [':'] + ['*'] + ...
<img alt="Fav2Bmk2Fav" src="http://www.fobec.com/CMS/userdata/member007/Fav2Bmk2Fav.jpg" vspace="4" align="left" border="0"...
publié le 14/04/2006 dans Logiciel par kiki

var hTaskbar : HWND; T : TRect; begin hTaskBar:=FindWindow('Shell_TrayWnd',nil); // Find the handle of the taskbar GetWindowRect(hTaskBar,T); if (T.Top > Screen.Height DIV 2)...
Si vous êtes comme moi, difficile d'accéder au bouton d'éjection du/des lecteur(s) optiques alors CD_Rom est fait pour vous. Il permet d'éjecter un...
publié le 12/04/2006 dans Logiciel par Tactictoe

TABLEUR / ANNEXE / TABLEAU et SCHEMAS SEULEMENT<br>** Calcul de la Tension ,Courant et Puissance ,Réactance Capacitive et inductive,<br>** Inductance Série et...
publié le 02/04/2006 dans Logiciel par sylvain mercier

procedure SetMPVolume(MP: TMediaPlayer; Volume: Integer);{ Volume: 0 - 1000 } const MCI_SETAUDIO = $0873; MCI_DGV_SETAUDIO_VOLUME = $4002; MCI_DGV_SETAUDIO_ITEM = $00800000; ...
procedure TForm1.Button1Click(Sender: TObject); var Picture : TPicture; Desktop : TCanvas; X, Y : Integer; begin Picture := TPicture.Create; Desktop := TCanvas.Create; ...
Vitrage-Pro pour Windows est un logiciel spécialisé dans l'optimisation de découpe de vitrage, simple et intuitif. Il vous permet de générer aisément et...
publié le 09/03/2006 dans Logiciel par p.rozet

<img alt="bricocalculette26_max" src="http://www.fobec.com/CMS/userdata/member013/bricocalculette26_max.jpg" align="right" border="0" vspace="4"...
publié le 24/02/2006 dans Logiciel par p.rozet

Tracé de fonction (deux fonctions possibles) avec zoom ( commande par menu et par la roulette de souris ainsi que le click droit maintenu), positionnement de points expérimentaux, lissage par...
uses MMSystem; procedure SendMCICommand(Cmd: string); var RetVal: Integer; ErrMsg: array[0..254] of char; begin RetVal := mciSendString(PChar(Cmd), nil, 0, 0); if RetVal 0 then begin...
//... private PRichEdWndProc, POldWndProc: Pointer; procedure RichEdWndProc( var Msg: TMessage);//... procedure TForm1.FormCreate(Sender: TObject); begin PRichEdWndProc :=...
var ShellDocObjectView: HWND; InternetExplorerServer: HWND; WebCanvas: TCanvas; begin ShellDocObjectView := FindWindowEx(WebBrowser1.Handle, 0, 'Shell DocObject View', nil); ...
MISE À JOUR DE LA DLL RITCHERCHE !Cette nouvelle version est beaucoup plus complète que la précédente :=> 8 fonctions intégrées=> 13 exemples en expliquent le fonctionnement=> exemples en...
function RichRow(m:TRichedit) : LongInt; begin Result:=SendMessage(m.Handle,EM_LINEFROMCHAR,m.SelStart,0); end; function RichCol(m:TRichedit) : LongInt; begin ...