Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   TrackBar con BD (https://www.clubdelphi.com/foros/showthread.php?t=60551)

JoseFco 06-10-2008 01:48:19

TrackBar con BD
 
"Tolomeo se mudo al Polo Norte"

Neftali [Germán.Estévez] 06-10-2008 07:39:09

Puedes probar a usar RecNo y RecordCount del TDataset asociado, para la posición y el máximo respectivamente.

JoseFco 06-10-2008 12:54:55

"Tolomeo se mudo al Polo Norte"

Neftali [Germán.Estévez] 06-10-2008 16:26:12

Cita:

Empezado por JoseFco (Mensaje 318382)
...no conosco esos componentes me tocara estudiarlos a ver si logro con ellos lo que quiero.

Seguro que sí los conoces...:D:D:D
El TDataset es el descendiente del TTable, TQuery o similar que estés utilizando, por lo tanto ese componente tienes las dos propiedades comentadas antes: RecNo y RecorCount.

JoseFco 06-10-2008 16:43:35

"Tolomeo se mudo al Polo Norte"

Delphius 06-10-2008 16:51:13

Hola José,
No se que tanto necesitas saber sobre base de datos, pero como te estás introduciendote en el área no estaría demás una lectura al libro la Cara Oculta. Lo puedes descargar de aquí.
Al menos los capítulos que trata el tema sobre acceso a campos y tablas sería una opción a considerar.

Saludos,

roman 06-10-2008 17:26:55

¿Quieres un trackbar para indicar el número de registro en el que estás o para indicar el valor de un determinado campo numérico?

Pregunto esto porque las respuestas que te han dado están encaminadas a lo primero, pero por tu último menaje me da la impresión que tienes campos numéricos (16) y quieres un trackbar para cada uno.

// Saludos

JoseFco 06-10-2008 17:55:28

"Tolomeo se mudo al Polo Norte"

Delphius 06-10-2008 18:26:06

Cita:

Empezado por JoseFco (Mensaje 318437)
Mas bien es lo segundo, yo quiero poder poner un valor a cada paso de un solo trackbar.Que yo pueda jugar con esos valores numericos.

Ejemplo: en su comienzo puede ser 65, en el segundo paso el valor podra ser 45 y asi.No estar amarrado a la posicion 0 to 16 por ejemplo.

El trackbar estara dandole valores a otro componente y este sera en numeros.No se si se pueda usar un array [0......15] y usar case.

Un Saludo.

PD:Decia la del DB porque en el se podrian poner estos valores.:confused:

Hola José,
Disculpame pero no comprendo lo que deseas hacer.:o
Se que tal vez no te resulte fácil explicar con muchos detalles lo que deseas hacer pero te agradecería si pudieras explicarnos y aportarnos una descripción más profunda y detallada.

Saludos,

eduarcol 06-10-2008 18:44:01

bueno si esos valores van a ser constantes y no tienen que cambiar mucho pues usa la matriz, de lo contrario vas a necesitar pensar en una BD, ahora si es solo para eso yo lo haria con archivos INI

JoseFco 06-10-2008 18:45:03

"Tolomeo se mudo al Polo Norte"

JoseFco 06-10-2008 18:46:52

"Tolomeo se mudo al Polo Norte"

eduarcol 06-10-2008 18:47:58

Cita:

Empezado por JoseFco (Mensaje 318450)
Bueno cuando yo cree el codigo le acigno un valor a cada una de las posiciones y esas no cambiaran mas nunca.;)

Un Saludo.

bueno entonces animate con la matriz es lo mas sencillo

roman 06-10-2008 18:54:12

Pues no sé si estoy entendiendo, pero creo que tú mismo ya lo resolviste.

Defines un arreglo

Código Delphi [-]
var
  Valores: array[0..15] of Integer;

Cada índice del arreglo corresponde a una de las 16 posiciones del TrackBar y accedes a sus valores con

Valores[TrackBar.Position]

// Saludos

Delphius 06-10-2008 19:04:00

Ahora entiendo.

Me parece que lo que ofrece roman es una buena solución, y sobre todo por ser bastante simple.

A ese array o vector le puedes asignar los valores muy cómodamente en cualquier momento, cuando sea necesario. Basta con indicar el índice:
Código Delphi [-]
Valores[0] := 50;
Valores[1] := 400;
...
Valores[15] := xx;

Y de igual manera para leer el valor:

Código Delphi [-]
una_variable := Valores[una_posicion];

Saludos,

JoseFco 06-10-2008 19:11:13

"Tolomeo se mudo al Polo Norte"

roman 06-10-2008 19:15:29

Código Delphi [-]
Label1.Caption := IntToString(Valores[TrackBar1.Position)];

// Saludos

JoseFco 06-10-2008 19:32:58

"Tolomeo se mudo al Polo Norte"

Delphius 06-10-2008 19:37:23

Un pequeñito, bien diminuto:), chascarillo para roman, si me lo permiten:o:
1. Es IntToStr()
2. Hay un error en el último corchete. Debe ir antes del paréntesis:

Código Delphi [-]
Label1.Caption := InToStr(valores[TRackBar.Position]);

Saludos,

enecumene 06-10-2008 19:39:20

Cita:

Empezado por Delphius (Mensaje 318465)
Un pequeñito, bien diminuto:), chascarillo para roman, si me lo permiten:o:
1. Es IntToStr()
2. Hay un error en el último corchete. Debe ir antes del paréntesis:

Código Delphi [-]Label1.Caption := InToStr(valores[TRackBar.Position]);


Saludos,

Iba a decir lo mismo pero por temor a que me banearan no lo hice :D


La franja horaria es GMT +2. Ahora son las 02:58:41.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi