Hola amigos este dia traigo las funciones mas comunes de los Datawindows de Power Builder que encontre en una pagina de internet... espero les sean de ayuda: SetTransObject Hace que un control DataWindow use un objeto de transacción especificado por el programador. El objeto de transacción proporciona la información nesecesaria para comunicarse con la Base de Datos. Retorna -1 si ha ocurrido un error. Sintaxis Dwn. Settransobject(Transacción) Argument Description Dwn El nombre del Control data window, con el cual se desea usar un objeto de transacción. Transacción Nombre del Objeto de transacción, por defecto es SQLCA. Generalmente se establece el objeto de transacción en el evento Open de la ventana que contiene el control DataWindow. En resumen el SettransObject(SQLCA) asocia el objeto transación con el control DataWindow. Ejemplo: DwnSoftware.settransobject(SQLCA) Inse...
Hola amigos programadores y visitantes en general. en esta ocasion les traigo un programa de los clasicos que nos ponen en las universidades o instituciones de estudio el cual conciste en estudiar una palabra y ver si es una palabra palindromica o no. el programa esta hecho en C# y esta muy facil de comprender y como siempre digo "Menos palabras y mas codigo" aqui esta el codigo: using System; namespace Palindrom { class Program { static void Main(string[] args) { Console.WriteLine("Escriba una palabra: "); Console.WriteLine((palindrome(Console.ReadLine()))?"Si es palindrome":"No es palindrome"); Console.ReadLine(); } public static bool palindrome(String palabra) { char[] inversa = palabra.ToCharArray(); Array.Reverse(inversa); string strInversa = new string(inversa); return palabra == strInversa; } } } este programa est...
Hola, este día les traigo un programa que presente en la universidad en la materia de programación espero les sea de ayuda. Este programa esta hecho en power builder. ---------codigo----------------- double a,b,f,c1 Integer N INt M, C, D, U String S if (Integer(Sle_numero.text) >0) then MessageBox(" ","I") a=0 b=1 for c1=1 to Integer(Sle_numero.text)-1 f=a+b N=f M=N / 1000 N=N - M * 1000 C=N / 100 N=N - C * 100 D= N / 10 U=N - D * 10 Choose case M Case 1 S="M" Case 2 S="MM" case 3 S="MMM" Case 4 S="MMMM" Case 5 S="MMMMM" case 6 S="MMMMMM" Case 7 S="MMMMMMM" Case 8 S="MMMMMMMM" case 9 S="MMMMMMMMM" End Choose Choose case C Case 1 S=S+"C" Case 2 S=S+"CC" case 3 S=S+"CCC" Case 4 S=S+"CD" Case 5 S=S+"D" case 6 S=S+"DC" Case...
Comentarios