[Lazarus-es] de hfiandor 08 mar 2013

Maxi maximiliano.duarte en gmail.com
Lun Mar 11 19:31:40 CET 2013


El día 11 de marzo de 2013 11:09, Maikel Enrique Pernia Matos
<corba en grannet.grm.sld.cu> escribió:
> Hector con respecto a tu primer pregunta no sé, no había prestado
> atención a esto antes, pues como bien lo dice el tipo de campo, es
> autogenerado por tanto nunca he detallado en controlar ese valor,
> simplemente lo tomo y utilizo en consecuencia de lo que pretendo hacer.
>
> Ahora en tu segunda pregunta, si lo que quieres es asignar en la
> propiedad items del combobox los valores almacenados en el campo de una
> tabla podría ser así, o al menos asi es como lo hago:
>
> <code>
> procedure TForm1.llenarComboBoxFor();
> var
>   i : Integer;
> begin
>    SQLQuery1.First;
>    for i := 0 to SQLQuery1.RecordCount-1 do
>    begin
>       ComboBox1.Items.Add(SQLQuery1.FieldByName('name').AsString);
>       SQLQuery1.Next;
>    end;
> end;
>
> procedure TForm1.llenarComboBoxWhile();
> begin
>    SQLQuery1.First;
>    while not SQLQuery1.EOF do begin
>       ComboBox1.Items.Add(SQLQuery1.FieldByName('name').AsString);
>       SQLQuery1.Next;
>    end;
> end;
>
> </code>
>
> El vie, 08-03-2013 a las 07:42 -1200, Héctor F. Fiandor Rosario
> escribió:
>> Estimados colegas:
>> estoy trabajando en una aplicación creada con Lazarus 0.9.27 y ahora
>> uso la 1.0.4
>>
>> estoy usando las Bases de Datos Sqlite3, que anteriormente, los campos
>> Id autonumericos los comenzo con "0". Ahora creo una tabla nueva,
>> igualita a otra anterior, y me encuentro que el campo Id autonumerico
>> lo comienza con "1". ¿esto es normal? recuerdo haber leido en alguna
>> parte que hay un comando para escoger si comienza con "0" o con "1",
>> pero no recuerdo donde lo lei.
>>
>> otra pregunta: estoy cargando un ComboBox con un campo de una tabla
>> Sqlite3, que fue declarado cuando cree la tabla como ftString.
>> al escribir
>> fCatalogo2.ComboBox1.Items:=fCatalogo2.tGerentes.FieldByName('nomGerente').AsString;
>> me da error: got AnsiString expected TString.
>> y no se como arreglar eso.
>>
>> agradeciendoles de antemano su ayuda
>>
>> los saluda,
>>
>> Ing. Héctor F. Fiandor Rosario
>> hfiandor en infomed.sld.cu
>> _______________________________________________
>> Lazarus-es mailing list
>> Lazarus-es en lists.lazarus.freepascal.org
>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
>
>
> --
>
> Este mensaje le ha llegado mediante el servicio de correo electronico que ofrece Infomed para respaldar el cumplimiento de las misiones del Sistema Nacional de Salud. La persona que envia este correo asume el compromiso de usar el servicio a tales fines y cumplir con las regulaciones establecidas
>
> Infomed: http://www.sld.cu/
>
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


tambien puedes usar addobject y guardar la clave del registro
ComboBox1.Items.AddObject(SQLQuery1.FieldByName('name').AsString,TObject(SQLQuery1.FieldByName('id').AsInteger));

no olvides liberar los objetos al cargar un nuevo conjunto de datos o
al cerrar el form.
-- 
El que pregunta aprende, y el que contesta aprende a responder.

No a la obsolecencia programada:
http://dimensionargentina.blogspot.com/2011/01/todo-esta-disenado-para-romperse.html

Linux User #495070
http://domonetic.com/blog




More information about the Lazarus-es mailing list