Accueil > Forum > > > > Pas de form
Pas de form
dimanche 1 février 2004 à 15:40:15 |
Pas de form

Benitora
|
Bonjour, Mon problème est assez simple, et je n'ai pas trouver bonheur dans le forum :s donc je le pose : je voudrais ne PAS inclure le fichier forms.pas et faire en sorte que le programme tourne en tache de fond. Également je souhaiterais savoir comment créer une form sans le fichier forms.pas, càd comme sous C++ par exemple où on indique les dimensions et les propriété d'une fenetre. J'avais déjà vu des programmes comme ça et le gains de tailles était énorme, de pres de 350ko en utilisant le ficier forms.pas et une 40ene de ko sans avec une forme crée entièrement. J'espère trouver une réponse, merci.
|
|
dimanche 1 février 2004 à 22:32:35 |
Re : Pas de form

yvemoreau
|
menu/voir/unités/Project1
program Project1;
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Dialogs, Unit1 in 'Unit1.pas';
{$R *.res} var x:Integer; begin x:=0; while x=0 do begin sleep(500); end; end.
note:le programme est répertorié dans le task ,on peut lui faire écouter les messages windows et lui faire exécuter une tâche en fonction d'un message en particulier ,évidemment ici je n'ai pas créer la procédure en question et le programme ne fait rien.
pour créer les fenêtres en runTime , on utilise Win32 Core API , mais cela en vaut-il la peine ...
unit Unit1; interface uses Windows,Classes,Dialogs; procedure CreateW; implementation
function RegisterClass: Boolean; var WindowClass: TWndClass; begin WindowClass.Style := CS_HREDRAW or CS_VREDRAW; WindowClass.lpfnWndProc := @DefWindowProc; WindowClass.cbClsExtra := 0; WindowClass.cbWndExtra := 0; WindowClass.hInstance := hInstance; WindowClass.hIcon := 0; WindowClass.hCursor := 0; WindowClass.hbrBackground := COLOR_WINDOW; WindowClass.lpszMenuName := nil; WindowClass.lpszClassName := 'TestClass'; Result := Windows.RegisterClass(WindowClass) <> 0; end;
procedure CreateW; var hWindow: HWND; begin if not RegisterClass then begin ShowMessage('Erreur Register'); Exit; end;
hWindow := CreateWindowEx( 0, 'TestClass', 'Window', WS_OVERLAPPEDWINDOW, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hInstance, nil);
if hWindow <> 0 then begin ShowWindow(hWindow, SW_SHOWNORMAL); UpdateWindow(hWindow); end else begin ShowMessage('Erreur Création'); Exit; end; end;
end.
yve
|
|
lundi 2 février 2004 à 18:29:10 |
Re : Pas de form
|
Cette discussion est classée dans : fichier, trouver, form, forms
Répondre à ce message
Sujets en rapport avec ce message
Inserer Un Menu dans un autre en execution [ par apz ]
Salut,je veux inserer le menu de la form MDIChild, lorse que celle-ci est ouverte, dans le menu de la form MDIForm (menu imbriqué).le Menu au debut (F
Forms dans DLL [ par cdodijon ]
Bonjour,J'ai créé une dll qui cree une form qui elle même cree une autre form de parametres: ça semble fonctionner mais j'ai deux problèmes:- le compo
Fenêtre "on top" [ par sebastienbro ]
Bonjours à tous,Voilà mon application comporte deux forms. Ces deux forms doivent rester visible (donc au dessus de toutes les autres) quelque soit la
recherche de fichier [ par petitripol ]
BOnjour tout le monde!Voilà j'aimerais savoir si une fonction existe a part fileexists et filesearch pour trouver un fichier exemple : opla.exe sans c
Un prog, 7 forms, un Ini.... quelle stratégie ? [ par DeltaFX ]
Yo, bande de codeurz, Je fais un prog ( toujours le meme, mais je résouds les pbs 1 par 1) qui a 8 forms dedans. la principale est affichée pendant q
lancement d'un fichier au démarrage de l'application [ par Pierre ]
Comment est-il possible, en Delphi, de lancer un fichier (.txt par exemple comme je l'indique ci-après) au démarrage sans que la TForm apparaisse ? Av
Comment Faire Pour Trouver le nom du executable Mais Pas Avec Application.exename [ par xmustapha ]
Bonjour Tout le Monde Comment Faire Pour Trouver le nom du executable Mais Pas Avec Application.ExeNameCar j'ai pas Forms dans Uses Type Du Programme
Deux Forms s'ouvrent à l'éxecution [ par L_art_ment ]
Mes cieux d'âmes, bonjour Hum, j'ai un petit soucis avec l'une des mes applis, lorsque je l'execute, mes deux forms s'ouvrent, or je souhaiterai qu
webbrowser et projet multiforms [ par dixieflatline ]
bonjour :) j'ai un projet qui comporte plusieurs forms, et un composant webbrowser se trouve sur la form principale. le probleme est le suivant: qd p
écriture dans un fichier binaire [ par elementalord ]
salut à tous!! je voudrais savoir comment ecrire dans un fichier binaire, j'ai atendu dire que celà me permetrait aussi d'avoir une taille de fichier
Livres en rapport
|
Derniers Blogs
[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ?MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ? par junarnoalg
La prochaine session de MyTIC aura lieu à Namur, le 23 mars prochain. Pendant presque une heure, nous parlerons de SharePoint 2010. Voici un aperçu du programme.
Accueil : 17h30 Début de la session : 18h00 - Les nouvelles int...
Cliquez pour lire la suite de l'article par junarnoalg [MIX10] KEYNOTE DEUXIèME JOURNéE - INTERNET EXPLORER 9, HTML5, VISUAL STUDIO 2010, ODATA[MIX10] KEYNOTE DEUXIèME JOURNéE - INTERNET EXPLORER 9, HTML5, VISUAL STUDIO 2010, ODATA par cyril
Le deuxième keynote du mix fut très riche en contenu. Internet Explorer 9 Juste un après le lancement de Internet Explorer 8, Microsoft a dévoilé les nouveautés de Internet Explorer 9. Désormais, IE supportera HTML5, SVG et CSS3. L'élément ...
Cliquez pour lire la suite de l'article par cyril CERTIFICATIONS BETA .NET 4CERTIFICATIONS BETA .NET 4 par KooKiz
Les inscriptions pour les certifications beta .NET 4 ont commencé. L'inscription est offerte pour les examens suivants : - 71-511, TS: Windows Applications Development with Microsoft .NET Framework 4 - 71-515, TS: Web Applications Development with...
Cliquez pour lire la suite de l'article par KooKiz
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|