Error en Consuta SQL

[lKinGl]

estemmm si lo resolvi a mi manera pero estoy claro que debo aprender a simplificar las cosas ya que se entenderia mejor y se ahorraria tiempo en programar tanto, ademas el software tarda algo de tiempo en realizar lo pedido creo que como (1seg) pero creo que simplificando el codigo sería mas rapido

de todas maneras gracias y trataré de aprender a simplificar mis códigos

[[Delphius]]

Empezado por lKinGl

estemmm si lo resolvi a mi manera pero estoy claro que debo aprender a simplificar las cosas ya que se entenderia mejor y se ahorraria tiempo en programar tanto, ademas el software tarda algo de tiempo en realizar lo pedido creo que como (1seg) pero creo que simplificando el codigo sería mas rapido

de todas maneras gracias y trataré de aprender a simplificar mis códigos

Este... ¿Y podríamos saber cual es tu manera?
Este sitio está hecho para que nos ayudemos entre todos y quien sabe, alguien en un futuro tiene el mismo problema y lo de "a tu manera" le es útil para resolverlo.

Saludos,

[lKinGl]

Código Delphi [-]
  Query1.Close;
  Query1.SQL.Clear;
  cadena1:='Select Aula,Dia,Prof,Hora1,Hora11,Hora2,Hora22,Hora3,Hora33,Hora4,Hora44,Hora5,Hora55,Hora6,Hora66,Hora7,Ho  ra77,Hora8,Hora88,Hora9,Hora99';
 cadena2:='Hora10,Hora101,Hora11a,Hora111,Hora12,Hora121,Hora13,Hora131,Hora14,H  ora141,Hora15,Hora151,Hora16,Hora161,Hora17,Hora171 From horario.db Where Aula like "' + (ComboBox1.Text) + '%"');
  Query1.SQL.Add(cadena1+cadena2);
  Query1.Active:=True;
  Query1.Open;
  dbgrid1.Columns.Items[0].Width:=100;
  dbgrid1.Columns.Items[1].Width:=100;
  dbgrid1.Columns.Items[2].Width:=100;
  dbgrid1.Columns.Items[3].Width:=50;
  dbgrid1.Columns.Items[4].Width:=50;
  dbgrid1.Columns.Items[5].Width:=50;
  dbgrid1.Columns.Items[6].Width:=50;
  dbgrid1.Columns.Items[7].Width:=50;
  dbgrid1.Columns.Items[8].Width:=50;
  dbgrid1.Columns.Items[9].Width:=50;
  dbgrid1.Columns.Items[10].Width:=50;
  dbgrid1.Columns.Items[11].Width:=50;
  dbgrid1.Columns.Items[12].Width:=50;
  dbgrid1.Columns.Items[13].Width:=50;
  dbgrid1.Columns.Items[14].Width:=50;
  dbgrid1.Columns.Items[15].Width:=50;
  dbgrid1.Columns.Items[16].Width:=50;
  dbgrid1.Columns.Items[17].Width:=50;
  dbgrid1.Columns.Items[18].Width:=50;
  dbgrid1.Columns.Items[19].Width:=50;
  dbgrid1.Columns.Items[20].Width:=50;
  dbgrid1.Columns.Items[21].Width:=50;
  dbgrid1.Columns.Items[22].Width:=50;
  dbgrid1.Columns.Items[23].Width:=50;
  dbgrid1.Columns.Items[24].Width:=50;
  dbgrid1.Columns.Items[25].Width:=50;
  dbgrid1.Columns.Items[26].Width:=50;
  dbgrid1.Columns.Items[27].Width:=50;
  dbgrid1.Columns.Items[28].Width:=50;
  dbgrid1.Columns.Items[29].Width:=50;
  dbgrid1.Columns.Items[30].Width:=50;
  dbgrid1.Columns.Items[31].Width:=50;
  dbgrid1.Columns.Items[32].Width:=50;
  dbgrid1.Columns.Items[33].Width:=50;
  dbgrid1.Columns.Items[34].Width:=50;
  dbgrid1.Columns.Items[35].Width:=50;
  dbgrid1.Columns.Items[36].Width:=50;
  dbgrid1.Columns[0].Title.caption:='Aula';
  DBGrid1.Columns[1].Title.caption:='Dia';
  dbgrid1.Columns[2].Title.caption:='Prof';
  dbgrid1.Columns[3].Title.Caption:='Hora I1';
  dbgrid1.Columns[4].Title.Caption:='Hora F1';
  dbgrid1.Columns[5].Title.Caption:='Hora I2';
  dbgrid1.Columns[6].Title.Caption:='Hora F2';
  dbgrid1.Columns[7].Title.Caption:='Hora I3';
  dbgrid1.Columns[8].Title.Caption:='Hora F3';
  dbgrid1.Columns[9].Title.Caption:='Hora I4';
  dbgrid1.Columns[10].Title.Caption:='Hora F4';
  dbgrid1.Columns[11].Title.Caption:='Hora I5';
  dbgrid1.Columns[12].Title.Caption:='Hora F5';
  dbgrid1.Columns[13].Title.Caption:='Hora I6';
  dbgrid1.Columns[14].Title.Caption:='Hora F6';
  dbgrid1.Columns[15].Title.Caption:='Hora I7';
  dbgrid1.Columns[16].Title.Caption:='Hora F7';
  dbgrid1.Columns[17].Title.Caption:='Hora I8';
  dbgrid1.Columns[18].Title.Caption:='Hora F8';
  dbgrid1.Columns[19].Title.Caption:='Hora I9';
  dbgrid1.Columns[20].Title.Caption:='Hora F9';
  dbgrid1.Columns[21].Title.Caption:='Hora I10';
  dbgrid1.Columns[22].Title.Caption:='Hora F10';
  dbgrid1.Columns[23].Title.Caption:='Hora I11';
  dbgrid1.Columns[24].Title.Caption:='Hora F11';
  dbgrid1.Columns[25].Title.Caption:='Hora I12';
  dbgrid1.Columns[26].Title.Caption:='Hora F12';
  dbgrid1.Columns[27].Title.Caption:='Hora I13';
  dbgrid1.Columns[28].Title.Caption:='Hora F13';
  dbgrid1.Columns[29].Title.Caption:='Hora I14';
  dbgrid1.Columns[30].Title.Caption:='Hora F14';
  dbgrid1.Columns[31].Title.Caption:='Hora I15';
  dbgrid1.Columns[32].Title.Caption:='Hora F15';
  dbgrid1.Columns[33].Title.Caption:='Hora I16';
  dbgrid1.Columns[34].Title.Caption:='Hora F16';
  dbgrid1.Columns[35].Title.Caption:='Hora I17';
  dbgrid1.Columns[36].Title.Caption:='Hora F17';

me las tuve que ingeniar de una u otra forma ya que la conexion de internet donde estaba era muy pésima y me costo mucho entrar a la web del club

[[Delphius]]

Ya veo

No es por ser un tanto pesadito (bueno, si, algunos kilos de más tengo) pero lo mejor sería emplear varias veces Add().

query1.SQL.Add('select ...');
query1.SQL.Add('....');

Ahora una preguntita, de curioso nomás, ¿Porqué tantos campos? ¿No es posible estructurar de otro modo tu/s tabla/s?

Saludos,

[lKinGl]

ahhh ok, estemmm no se si sea posible estructurar mejor los campos de la tabla pero esta es la problematica:

en mi universidad necesitan un sistema pequeño que permita la distribucion de las cargas academicas y aulas de modo que no exista ninguna colisión y lo que llevo es en la tabla, las aulas máximo por dia se usan 17 horas, para evitar las colisiones con las horas de las aulas, necesito saber a quehora entra 1profesor y a que hora sale, y aque hora entra el otro y a que hora sale para evitar lo choques de horarios

Horas I.1 = Hora de Ingreso1
Horas F.1= Hora de Final 1
asi hasta 17 (Nº de horas maximo de uso por aula).

nada mas hay son 34 campos y son 37, no se que otra forma se te ocurre

estoy manejando horas militares enteras(01,02...22,23,24), para facilitar el sistema

abierto a sugerencias

[[Delphius]]

Empezado por lKinGl

ahhh ok, estemmm no se si sea posible estructurar mejor los campos de la tabla pero esta es la problematica:

en mi universidad necesitan un sistema pequeño que permita la distribucion de las cargas academicas y aulas de modo que no exista ninguna colisión y lo que llevo es en la tabla, las aulas máximo por dia se usan 17 horas, para evitar las colisiones con las horas de las aulas, necesito saber a quehora entra 1profesor y a que hora sale, y aque hora entra el otro y a que hora sale para evitar lo choques de horarios

Horas I.1 = Hora de Ingreso1
Horas F.1= Hora de Final 1
asi hasta 17 (Nº de horas maximo de uso por aula).

nada mas hay son 34 campos y son 37, no se que otra forma se te ocurre

estoy manejando horas militares enteras(01,02...22,23,24), para facilitar el sistema

abierto a sugerencias

Pues yo lo veo un tanto rebuscado y liado.

Yo más bien veo tres tablas:
Profesores - 1 --- * - Horarios - * --- Aulas -
Es decir, que entre las tabla Profesores y Aulas existe una relación M-M, por tanto se añade la tabla intermedia y se consigue una relación 1-M entre Profesores y Horarios y de igual modo entre Aulas y Horarios.

Los campos, me parecen que son bastantes sencillos de entender.
El tema de la "colisión" es ya un aspecto de programación.

Saludos,

[lKinGl]

esas exactamente son las tablas que tengo hechas, existen el campo que las relaciona como tu dices, pero lo que tu ves largo son el trato con las horas, que por cierto no creo que me este quedando bien del todo, ya que de la forma como lo llevo hay que alimentar de horas las aulas 1 por 1 pero se da el caso de que hay materias que no tienen 1 hora sino 2 o 3 y hay sino se como hacer.....