<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns="http://www.w3.org/TR/REC-html40" xmlns:v =
"urn:schemas-microsoft-com:vml" xmlns:o =
"urn:schemas-microsoft-com:office:office" xmlns:w =
"urn:schemas-microsoft-com:office:word" xmlns:m =
"http://schemas.microsoft.com/office/2004/12/omml"><HEAD>
<META http-equiv=Content-Type content="text/html; charset=utf-8">
<META content="MSHTML 6.00.2900.5512" name=GENERATOR>
<STYLE>@font-face {
font-family: Calibri;
}
@font-face {
font-family: Tahoma;
}
@page WordSection1 {size: 612.0pt 792.0pt; margin: 70.85pt 3.0cm 70.85pt 3.0cm; }
P.MsoNormal {
FONT-SIZE: 12pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman","serif"
}
LI.MsoNormal {
FONT-SIZE: 12pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman","serif"
}
DIV.MsoNormal {
FONT-SIZE: 12pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman","serif"
}
A:link {
COLOR: blue; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.MsoHyperlink {
COLOR: blue; TEXT-DECORATION: underline; mso-style-priority: 99
}
A:visited {
COLOR: purple; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.MsoHyperlinkFollowed {
COLOR: purple; TEXT-DECORATION: underline; mso-style-priority: 99
}
SPAN.EstiloCorreo17 {
COLOR: #1f497d; FONT-FAMILY: "Calibri","sans-serif"; mso-style-type: personal-reply
}
.MsoChpDefault {
FONT-FAMILY: "Calibri","sans-serif"; mso-style-type: export-only; mso-fareast-language: EN-US
}
DIV.WordSection1 {
page: WordSection1
}
</STYLE>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></HEAD>
<BODY lang=ES-MX vLink=purple link=blue bgColor=#ffffff>
<DIV><FONT face=Arial size=2>El SQL del SQLQuery debe incluir el campo de la
llave primaria.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>También puedes usar SQLQuery.execute; si le pasas
como SQL update <FONT face=Calibri><FONT color=#1f497d size=3>tabla set
fechaegresoAlumnos = fechaegreso where tabla.idkey =
id;</FONT></FONT></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>Saludos Cordiales</FONT></DIV>
<DIV>--<BR>Ismael </DIV>
<DIV>Devuan User: <A
href="http://distrowatch.com/table.php?distribution=devuan">http://distrowatch.com/table.php?distribution=devuan</A></DIV>
<DIV>Web Site: <A
href="http://www.sisconge.byethost15.com/">http://www.sisconge.byethost15.com/</A></DIV>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B>
<A title=lazarus-es@lists.lazarus-ide.org
href="mailto:lazarus-es@lists.lazarus-ide.org">hfiandor via Lazarus-es</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=lazarus-es@lists.lazarus-ide.org
href="mailto:lazarus-es@lists.lazarus-ide.org">'Spanish version of Lazarus
List'</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Cc:</B> <A title=hfiandor@ceniai.inf.cu
href="mailto:hfiandor@ceniai.inf.cu">hfiandor</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Monday, June 29, 2020 11:39
AM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> [Lazarus-es] de hfiandor 29 jun
2020</DIV>
<DIV><FONT face=Arial size=2></FONT><FONT face=Arial size=2></FONT><BR></DIV>
<DIV class=WordSection1>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Amigo
Maxi</SPAN><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">:<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Espero
que el corona no te haya tocado ni a tu familia.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Llevo
dos días trabado en algo que debe ser sencillo, pero no le doy donde
debo.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Tengo
un SQLQuery que me dice los records de una tabla que cumplen determinada
condición. Solo la uso para recorrerla y hacer algo en otra tabla usando el
locate. Esto parece que trabaja bien en cuanto a empatar el record
adecuado.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">En
esta segunda tabla en el record empatado hay un campo que está vacío, y ahí
quiero poner una fecha.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Yo
hago esto<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">fdm.tAlumnos.Edit:<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">fdm.tAlumnos.FieldbyName(‘fechaegresoAlumnos’).asString:=fechaegreso;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">fdm.tAlumnos.Post;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">fdm.tAlumnos.ApplyUpdate;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">fdm.tAlumnos.Close;
//la tabla se salva cuando se cierra<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">fdm.tAlumnos.Open;<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Se
ríe de mí y ya creo que me saca hasta la lengua.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Si
meto el dato de forma convencional y usando el Navigator para el Post, no hay
líos.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Espero
no causarte mucha molestia,<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Saludos,<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">Ing.
Héctor Fiandor Rosario<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN lang=ES
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'">hfiandor@ceniai.inf.cu<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"> <SPAN
lang=ES><o:p></o:p></SPAN></SPAN></P>
<P class=MsoNormal><SPAN
style="FONT-SIZE: 11pt; COLOR: #1f497d; FONT-FAMILY: 'Calibri','sans-serif'"><o:p> </o:p></SPAN></P>
<P class=MsoNormal><B><SPAN lang=ES
style="FONT-SIZE: 10pt; FONT-FAMILY: 'Tahoma','sans-serif'">De:</SPAN></B><SPAN
lang=ES style="FONT-SIZE: 10pt; FONT-FAMILY: 'Tahoma','sans-serif'">
Lazarus-es [mailto:lazarus-es-bounces@lists.lazarus-ide.org] <B>En nombre de
</B>Maxi via Lazarus-es<BR><B>Enviado el:</B> miércoles, 24 de junio de 2020
02:34 p. m.<BR><B>Para:</B> Spanish version of Lazarus List<BR><B>CC:</B>
Maxi<BR><B>Asunto:</B> Re: [Lazarus-es] como salvar una variable
simple<o:p></o:p></SPAN></P>
<P class=MsoNormal><o:p> </o:p></P>
<DIV>
<P class=MsoNormal>existe un componente que registra todo el formulario
incluido los datos, creo se llama TFormRegIni<o:p></o:p></P></DIV>
<P class=MsoNormal><o:p> </o:p></P>
<DIV>
<DIV>
<P class=MsoNormal>El mar., 9 jun. 2020 a las 22:12, Iván Lugo Herrera via
Lazarus-es (<<A
href="mailto:lazarus-es@lists.lazarus-ide.org">lazarus-es@lists.lazarus-ide.org</A>>)
escribió:<o:p></o:p></P></DIV>
<BLOCKQUOTE
style="BORDER-RIGHT: medium none; PADDING-RIGHT: 0cm; BORDER-TOP: medium none; PADDING-LEFT: 6pt; PADDING-BOTTOM: 0cm; MARGIN-LEFT: 4.8pt; BORDER-LEFT: #cccccc 1pt solid; MARGIN-RIGHT: 0cm; PADDING-TOP: 0cm; BORDER-BOTTOM: medium none">
<DIV>
<P class=MsoNormal>Hola Héctor, compañeros de la lista.<o:p></o:p></P>
<DIV>
<P class=MsoNormal>Si los datos a guardar no son sensibles podrías usar un
archivo .INI, muy utilizado para guardar referencias. El inconveniente
potencial es que todo se guarda en modo texto y es accesible por
cualquiera.<o:p></o:p></P>
<DIV>
<P class=MsoNormal>Solo requieres:<o:p></o:p></P></DIV>
<DIV>
<P class=MsoNormal> uses <BR>
IniFiles;<o:p></o:p></P></DIV>
<DIV>
<P class=MsoNormal> TIniFile.Create<o:p></o:p></P></DIV>
<DIV>
<P class=MsoNormal> WriteString y ReadString (o ReadBool,
etc según el tipo utilizado)<o:p></o:p></P></DIV></DIV>
<DIV>
<P class=MsoNormal><o:p> </o:p></P></DIV>
<DIV>
<P class=MsoNormal>Hay mucha información en internet para su
manejo.<o:p></o:p></P></DIV>
<DIV>
<P class=MsoNormal><o:p> </o:p></P></DIV>
<DIV>
<P class=MsoNormal>ILH<o:p></o:p></P></DIV></DIV>
<P class=MsoNormal><o:p> </o:p></P>
<DIV>
<DIV>
<P class=MsoNormal>El mar., 9 jun. 2020 a las 11:52, Oscar Gunsett via
Lazarus-es (<<A href="mailto:lazarus-es@lists.lazarus-ide.org"
target=_blank>lazarus-es@lists.lazarus-ide.org</A>>)
escribió:<o:p></o:p></P></DIV>
<BLOCKQUOTE
style="BORDER-RIGHT: medium none; PADDING-RIGHT: 0cm; BORDER-TOP: medium none; PADDING-LEFT: 6pt; PADDING-BOTTOM: 0cm; MARGIN-LEFT: 4.8pt; BORDER-LEFT: #cccccc 1pt solid; MARGIN-RIGHT: 0cm; PADDING-TOP: 0cm; BORDER-BOTTOM: medium none">
<DIV>
<P class=MsoNormal>Supongo que tendrás que crear un archivo binario
para almacenar tus variables. <o:p></o:p></P></DIV>
<P class=MsoNormal><o:p> </o:p></P>
<DIV>
<DIV>
<P class=MsoNormal>El mar., 9 jun. 2020 a las 11:34, hfiandor via
Lazarus-es (<<A href="mailto:lazarus-es@lists.lazarus-ide.org"
target=_blank>lazarus-es@lists.lazarus-ide.org</A>>)
escribió:<o:p></o:p></P></DIV>
<BLOCKQUOTE
style="BORDER-RIGHT: medium none; PADDING-RIGHT: 0cm; BORDER-TOP: medium none; PADDING-LEFT: 6pt; PADDING-BOTTOM: 0cm; MARGIN-LEFT: 4.8pt; BORDER-LEFT: #cccccc 1pt solid; MARGIN-RIGHT: 0cm; PADDING-TOP: 0cm; BORDER-BOTTOM: medium none">
<DIV>
<DIV>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=EN-US>Estimados listeros</SPAN><SPAN
lang=ES>:</SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES> </SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES>Estoy haciendo una app que tiene un PageControl. Una de las
hojas le llamé tsGeneral y tiene tres variables
simples.</SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES> </SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES>Quisiera poderlas salvar para cuando abra la próxima vez la app
sus valores estén como deben, al igual que lo hacen las tablas de
BD.</SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES> </SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES>Les agradecería que me indicaran, creo que es la primera vez en
muchos años que trato de hacer esto y sencillamente no
sé.</SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES> </SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES>Al tanto de sus noticias, los saluda,</SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"> <o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES>Ing. Héctor Fiandor Rosario</SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES><A href="mailto:hfiandor@ceniai.inf.cu"
target=_blank>hfiandor@ceniai.inf.cu</A></SPAN><o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"> <o:p></o:p></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
lang=ES> </SPAN><o:p></o:p></P></DIV></DIV>
<P
class=MsoNormal>_______________________________________________<BR>Lazarus-es
mailing list<BR><A href="mailto:Lazarus-es@lists.lazarus-ide.org"
target=_blank>Lazarus-es@lists.lazarus-ide.org</A><BR><A
href="https://lists.lazarus-ide.org/listinfo/lazarus-es"
target=_blank>https://lists.lazarus-ide.org/listinfo/lazarus-es</A><o:p></o:p></P></BLOCKQUOTE></DIV>
<P
class=MsoNormal>_______________________________________________<BR>Lazarus-es
mailing list<BR><A href="mailto:Lazarus-es@lists.lazarus-ide.org"
target=_blank>Lazarus-es@lists.lazarus-ide.org</A><BR><A
href="https://lists.lazarus-ide.org/listinfo/lazarus-es"
target=_blank>https://lists.lazarus-ide.org/listinfo/lazarus-es</A><o:p></o:p></P></BLOCKQUOTE></DIV>
<P
class=MsoNormal>_______________________________________________<BR>Lazarus-es
mailing list<BR><A href="mailto:Lazarus-es@lists.lazarus-ide.org"
target=_blank>Lazarus-es@lists.lazarus-ide.org</A><BR><A
href="https://lists.lazarus-ide.org/listinfo/lazarus-es"
target=_blank>https://lists.lazarus-ide.org/listinfo/lazarus-es</A><o:p></o:p></P></BLOCKQUOTE></DIV>
<P class=MsoNormal><BR clear=all><BR>-- <o:p></o:p></P>
<DIV>
<P class=MsoNormal>El que pregunta aprende, y el que contesta aprende a
responder.<BR><BR>No a la obsolecencia programada: <A
href="http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml"
target=_blank>http://www.rtve.es/noticias/20110104/productos-consumo-duran-cada-vez-menos/392498.shtml</A><BR><BR>Linux
User #495070<BR><A href="http://domonetic.com/blog"
target=_blank>http://domonetic.com/blog</A><o:p></o:p></P></DIV></DIV>
<P>
<HR>
<P></P>_______________________________________________<BR>Lazarus-es mailing
list<BR>Lazarus-es@lists.lazarus-ide.org<BR>https://lists.lazarus-ide.org/listinfo/lazarus-es<BR></BLOCKQUOTE></BODY></HTML>