FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
[duda Sencilla] Delphi
HOla soy nuevo en este foro, acabo de empezar con delphi y tengo dudas MUY basicas:
Porque no funcionan ninguno de estos codigos? Aviso que no tengo ni idea de Delphi Code1: procedure TForm1.FormCreate(Sender: TObject); var a:integer; b:integer; begin * *a:=4; * *b:=4; * *if a=b then * * *edit1.Text:= 'hola'; end. Code2: function DD(s:string):string; begin *result:= s + s + s end; ///////////////////////////////////////////////////// procedure TForm1.FormCreate(Sender: TObject); var a:string; begin * *a:='hhh'; * *if a = dd('h') then * * *edit1.Text:= 'hola'; end. Gracias! |
#2
|
|||
|
|||
Hola.
A primera vista, creo que el problema son los asteríscos (*). Basta con que los quites y creo que te funcionará. Saludos. |
#3
|
||||
|
||||
Hola
Lo que puedo ayudar: Codigo 1:
Codigo 2
Creo que por ahi va el asunto: Saludos
__________________
Siempre Novato |
#4
|
|||
|
|||
Yo tambien soy nuevo en esto, pero basicamente por lo que vi en el código que dejaste tendrias que sacar los asterisco (*) y con eso bastaria.
|
#5
|
|||
|
|||
Gracias, lo de los asteriscos era que se me pegaron de alguna manera al copiar codigo ...
Muchas gracias! |
#6
|
|||
|
|||
Otra dudilla rapida aprobechando:
Que hago mal aqui??
|
#7
|
|||
|
|||
Sinceramente no veo el error, me parece todo logico...
|
#8
|
||||
|
||||
Hola Abaco, debes mostrarnos el error que te sale para poder ayudarte mejor, por lo que veo, cambia el punto por punto y coma del end del FormCreate solo el end de la unidad lleva punto.
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#9
|
|||
|
|||
Hola caro, lo primero disculparme por los errores, quizas son muy tontos...
Mira me sigue dando error... No se que se me escapa, estos son los errores que me saltan : Cita:
|
#10
|
|||
|
|||
Es suficiente informacion para resolverme la duda?
|
#11
|
||||
|
||||
Hola
Pues no se de donde sale el error, a mi no me genera ninguno, lo unico es que simplemente no envia el 'Hola' al edit ya que para que se de; la funcion tiene que generar el factor boleano y este la unica manera en que puede cumplirlo es en la ultima condicion. Para que la condicion if i = lnumber then se cumpla tiene que i := i + x;, al no darle valor a i nunca se cumple. Por esta razon la logica 'De novato' me dice que si se da valor a i se cumple con la condicion, pero, siempre lo hara, en tal caso la funcion no haria nada importante, simplemente hace una comparacion logica, algo que hace una variable sin problemas. Es lo que veo al hacer esta pruebita interesante de practica. Saludos
__________________
Siempre Novato Última edición por Caral fecha: 26-08-2010 a las 03:25:19. |
#12
|
|||
|
|||
Hola
saludos |
#13
|
|||
|
|||
Graciaaaaas, ahora no da error, peeeeeeero...
Deberia devolver true con 6... Mira asi hago en vb: Código:
Private Sub Form_Load() MsgBox IsPerfectNumber(6) End Sub Public Function IsPerfectNumber(ByVal lNumber As Long) As Boolean Dim x As Long Dim i As Long For x = 1 To lNumber - 1 If (lNumber Mod x = 0) Then i = i + x Next If i = lNumber Then IsPerfectNumber = True End Function Muchas gracias |
#14
|
|||
|
|||
Cita:
saludos |
#15
|
||||
|
||||
Hola
Amigo y que hace esto No genera errores pero no hace el efecto. Saludos
__________________
Siempre Novato |
#16
|
||||
|
||||
Hola.
Lo que tanto temia se volvio realidad.... !! NO EXISTEN LOS NUMEROS PERFECTOS !!! Saludos. |
#17
|
|||
|
|||
Cita:
saludos Última edición por egostar fecha: 26-08-2010 a las 03:47:16. Razón: Si sabe :D |
#18
|
||||
|
||||
Hola
Si, lo se, pero en el ejemplo que pusiste no generaba ningún dato ya que i no contenía valor alguno. Estoy probando los códigos para aprender algo mas. Saludos
__________________
Siempre Novato |
#19
|
|||
|
|||
Cita:
saludos |
#20
|
||||
|
||||
Hola
Es una funcion sencilla de entender y mira que soy malo con las funciones. Saludos PD: Que feo es Visual Basico.
__________________
Siempre Novato |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Una consulta sencilla | codicia | Varios | 3 | 21-12-2009 04:54:06 |
Pagina web, sencilla | Caral | HTML, Javascript y otros | 6 | 16-05-2007 10:48:21 |
Consulta Sencilla SQL + Delphi | Maury Manosalva | SQL | 4 | 08-09-2005 11:17:47 |
pregunta sencilla | valentine | Varios | 7 | 17-06-2004 21:17:40 |
Pregunta Sencilla | jorge_mosquera | Gráficos | 1 | 19-03-2004 03:39:20 |
|