8 consejos para Delphi:
1. ¿Cómo llamar a un archivo exe externo en Delphi?
utilizaWinProcs;
.
comenzar
WinExec(...);
.
fin.
No es diferente de llamar a funciones de la biblioteca Pascal.
2. Cómo cambiar la fuente y el color de la sugerencia de Delphi
Las propiedades de TApplication en Delphi incluyen HintColor y HintPause.
Puede cambiar el color de Hint en la aplicación configurando HintColor y configurando HintPause
Cambie la hora en que se activa la sugerencia.
Pero desafortunadamente: la fuente de Hint no se puede cambiar en Delphi.
3. Cómo calcular la fecha en Delphi
Calcular el tiempo es lo más fácil en Delphi, de la siguiente manera:
var ss: TDateTime
De hecho, Tdatetime es un número de punto flotante de doble precisión y su punto decimal representa el número de días:
Por ejemplo, ss := ss + 20 significa 20 días desde ss, si ss = 234,567
Significa 234.567 días, ¡a partir del año 0 d. C., por supuesto!
4. ¿Cómo programar ScreenSaver usando Delphi (nulo)
El protector de pantalla no es más que un programa ejecutable cuya extensión se cambia a .SCR. Acepta dos parámetros de línea de comando:
-s ejecutar parámetros del comando
-c configurar parámetros del comando
Windows inicia un programa enviando el parámetro de línea de comando -s al programa.
Cabe señalar que: la ventana del programa no tiene bordes ni título; el tamaño de la ventana debe ser el mismo que el tamaño de la pantalla;
Manejo de eventos de ventana.
5. Cómo cambiar el nombre de un directorio en Delphi
Llame a la función RenameFile, como por ejemplo:
RenameFile('c:/wang/temp', 'c:/wang/tmp');
6. DELPHI muestra archivos de imagen JPEG
Simplemente agregue JPEG a los usos
Hay una clase TJPEGImage en la unidad JPEG, que puede definir una variable como Jpeg y llamarla con LoadFromFile.
Importe un archivo JPEG y luego use Canvas.Draw(x,y,Jpeg) del formulario para mostrarlo.
7. Procesamiento de archivos en formato Jpeg en Delphi...
(1). Agregue la unidad JPEG a Usos;
(2). Defina una variable global, como var AJPEG: TJPEGImage;
(3). Agregue: en el evento OnCreate del Formulario:
Color.del.lápiz.del.lienzo:=clNegro;
Canvas.Pen.Style:=psSolid;
Lienzo.Brush.color:=clBtnFace;
Canvas.Brush.Style:=bsSolid; //Esto es para establecer algunas propiedades de Canvas para conveniencia futura.
//Borrar formulario y cargar un nuevo archivo JPEG;
AJpeg:=TJpegImage.Create;//Generar dinámicamente AJpeg;
AJpeg.LoadFromFile('D:/Temp.jpg') // Después de generar AJpeg, carga el archivo JPEG;
(4).Agregue el evento OnPain del formulario.
Canvas.Rectangle(2,2,560,430); //Dibuja un rectángulo negro para rodear la imagen;
x:=10; y:=10;
Form1.Canvas.Draw(x,y,AJpeg); // Genera el archivo JPEG con (x,y) como esquina superior izquierda;
// De hecho, su función es restaurar los gráficos cuando se destruyen;
(5). Agregue lo siguiente al evento OnClick del botón 'Cargar' o 'Examinar':
comenzar
si OpenPictureDialog1.Execute entonces
comenzar
AJpeg.Free; //Libera el antiguo AJpeg;
AJpeg:=TJpegImage.Create; //Generar un nuevo AJpeg;
AJpeg.LoadFromFile(OpenPictureDialog1.Filename); //Cargar archivo JPEG;
fin;
Canvas.Rectangle(2,2,560,430); //Borrar formulario;
x:=10;
y:=10;
Form1.Canvas.Draw(x,y,AJpeg); //Mostrar nuevo AJpeg;
fin;
8. Pantalla de inicio de DELPHI3