Développer un logiciel avec Delphi - page 5

Avec Delphi, rien n'est impossible ! Telle a été notre devise pendant des années. A la fois EDI et langage de développement (Pascal), l'outil Delphi facilite grandement la création d'applications. A l'origine, Delphi est un langage compilé qui s'execute sur des plateformes 32 bits. Depuis l'editeur a apporté de nouvelles fonctionnalités qui ne sont pas traitées sur Fobec.com.

Afficher les Hints dans une StatusBar

{....} private { Private-Deklarationen } procedure MyHint(Sender: TObject); {....} procedure TForm1.FormCreate(Sender: TObject); begin Application.OnHint := MyHint; ShowHint := true; ...

Ajouter du texte à la fin du document HTML dans un TWebBrowser

uses MSHTML; procedure TForm1.Button1Click(Sender: TObject); var Range: IHTMLTxtRange; begin Range := ((WebBrowser1.Document as IHTMLDocument2).body as IHTMLBodyElement).createTextRange; ...

Mettre à jour une table

Mettre à jour les calcul d'une table à partird'une autre avec 2 ligne de prog seulement

WebBrowser : erreur fatale avec certains jScript

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 CodeBarre

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 Impression ou...

Ajouter la page en cours dans un TWebBrowser aux favoris

// Placer sur la TForm: 1 TEdit, 2 TButtons, 1 TWebbrowser const NotAllowed: set of Char = ['"'] + ['/'] + [''] + ['?'] + [':'] + ['*'] + [''] + ['|'];implementation{$R *.DFM} function ...

Connaitre la position de la barre des tâches

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) and...

Règler le volume du Mediaplayer

procedure SetMPVolume(MP: TMediaPlayer; Volume: Integer);{ Volume: 0 - 1000 } const MCI_SETAUDIO = $0873; MCI_DGV_SETAUDIO_VOLUME = $4002; MCI_DGV_SETAUDIO_ITEM = $00800000; ...

Dessiner sur le bureau

procedure TForm1.Button1Click(Sender: TObject); var Picture : TPicture; Desktop : TCanvas; X, Y : Integer; begin Picture := TPicture.Create; Desktop := TCanvas.Create; ...

Tracé de fonction physique

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...

Astuces Delphi

Catégorie
Résumé de la rubrique
Contenu
659 articles
Rédaction
22 auteurs
Mise a jour
21/12/2010
Partager sur les réseau sociaux