Full Delphi

Hola,

A todos los que les gusta programar en Delphi como a mi, les presento una recopilacion hecha por mi de consejos, trucos y ejemplos de este excelente lenguaje de programacion.




Contenido parcial

Convertir la primera letra mayúscula y las demás minúsculas

Tal como te dice Casimiro tienes que usar las funciones UPPER Y LOWER.

UPDATE empleados
SET nombre = LEFT(UPPER(nombre),1) ||
RIGHT(LOWER(nombre),CHAR_LENGTH(nombre)-1) WHERE empleados_id = 1

Actualizar un campo que contiene información extra, ejemplo: realizar un UPDATE y dejar solo la palabra Madero

Nombre Dirección
C. Carlos Cuaron Colonia Madero #222

UPDATE colonias SET direccion='Madero' WHERE direccion IN
(SELECT direccion FROM colonias WHERE direccion LIKE '%Madero%')
Aunque personalmente creo que es mucho más simple y elegante esta otra:
UPDATE colonias SET direccion = 'Madero'
WHERE direccion CONTAINING 'Madero'

Formato en centenas, decimales y unidades


Tengo un campo Char con estos datos 85.12 o también con 115.12 como valores y necesito que pasarlo a este 008512 o en el caso 011512 no se si tendría que hacerlo en un If o si hay una función para hacerlo. Simplemente multiplica el número por 100.

SELECT lpad((CAST(lpad((numero*100), 6, '0') AS Integer)),6,'0')
FROM A_tabla


Asignarle el Valor de un DBEdit a un DBGrid

Saben cómo puedo hacer que una columna del DBGrid me copie el Valor que Tiene un DBEdit.
Table1.FieldByName('Valor').AsString := Edit1.Text;

IBDataSet.FieldByName('Valor').AsString:=DBEdit.Field.AsString




Full Delphi
0 Puntos Score: 0/10
Visitas: 1876 Favoritos: 6
4 Comentarios Full Delphi
Vale. Me ahorras tiempo y cabecear buscando la soluci?
Muy bueno, gracias  
Excelente aporte, muchas gracias, descargado y a aprender... ?
Una pregunta est?
Para dejar un comentario Registrate! o.. eres ya usuario? Accede!