AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Anzeigen von Sendern(TV) sortiert nach Uhrzeit
Thema durchsuchen
Ansicht
Themen-Optionen

Anzeigen von Sendern(TV) sortiert nach Uhrzeit

Ein Thema von Cyberaxx · begonnen am 6. Mai 2011 · letzter Beitrag vom 6. Mai 2011
Antwort Antwort
Benutzerbild von Cyberaxx
Cyberaxx

Registriert seit: 15. Jul 2005
311 Beiträge
 
Delphi XE5 Professional
 
#1

Anzeigen von Sendern(TV) sortiert nach Uhrzeit

  Alt 6. Mai 2011, 10:52
Hallo

Ich habe ein problem damit die verschiedenen Sender nach Urzeit nebeneinander anzuzeigen.

Daten sind in MySQL gespeichert.
Zitat:
epg_channels (id, name)
epg_program (id, day, channel_id, prg_begin, prg_end, name, beschreibung)
Ich möchte die Daten nun gerne so anzeigen lassen das in der ersten Spalte die Uhrzeit steht und in den folgenden Spalten jeweils das Programm.

Uhrzeit | Pro7 | Sat1 | Vox | ...

Jeder Sender hat natürlich unterschiedliche Anfangszeiten.

Kann man das in einer Abfrage lösen?

Ich würde ungerne eine Tabelle bauen in der ich die Sender fest einbinde, wäre mir zu unflexibel..

Hat hierzu jemand einer Lösung und kann mir helfen?

MfG
Cyberaxx
Daniel
Das Aufwachen aus einem boesen Traum muss einen nicht erleichtern. Es kann einen auch erst richtig gewahr werden lassen, was man Furchtbares getraeumt hat, vielleicht sogar welcher furchtbaren Wahrheit man im Traum begegnet ist!
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.659 Beiträge
 
Delphi 12 Athens
 
#2

AW: Anzeigen von Sendern(TV) sortiert nach Uhrzeit

  Alt 6. Mai 2011, 12:32
Die Sender auf verschiedene Spalten aufzuteilen dürfte recht aufwändig sein, wenn es aber auch in einer einzigen Spalte geht, kannst Du Dir einmal GROUP_CONCAT() ansehen.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von Cyberaxx
Cyberaxx

Registriert seit: 15. Jul 2005
311 Beiträge
 
Delphi XE5 Professional
 
#3

AW: Anzeigen von Sendern(TV) sortiert nach Uhrzeit

  Alt 6. Mai 2011, 12:38
Es sollten schon für jeden Sender eine Spalte sein.

Habe es im Moment so gelöst das ich 24 Abfragen habe. Für jede Stunde eine. Diese füge ich dann ins Grid ein.
Beim laden merkt man davon kaum etwas, das es für jede Stunde eine Abfrage ist.

Schön ist es dennoch auch nicht gerade.

Das GROUP_CONTACT() werde ich mir mal ansehen.

Danke
Daniel
Das Aufwachen aus einem boesen Traum muss einen nicht erleichtern. Es kann einen auch erst richtig gewahr werden lassen, was man Furchtbares getraeumt hat, vielleicht sogar welcher furchtbaren Wahrheit man im Traum begegnet ist!
  Mit Zitat antworten Zitat
alfold

Registriert seit: 29. Jun 2010
Ort: Neustrelitz
393 Beiträge
 
Delphi 7 Enterprise
 
#4

AW: Anzeigen von Sendern(TV) sortiert nach Uhrzeit

  Alt 6. Mai 2011, 13:22
Es sollten schon für jeden Sender eine Spalte sein.

Habe es im Moment so gelöst das ich 24 Abfragen habe. Für jede Stunde eine. ....
mh... Bin zwar kein SQL experte aber warum 24 Abfragen?
Eine reicht doch aus, mit der aktuellen Uhrzeit -paar minuten.
bzw als increment in einer For Schleife die Uhrzeit durchselectieren.

Oder bei der manuellen Eingabe reicht auch eine Abfrage aus. Dann mit select oder findselect oder wie das heisst die Zeile nehmen der der Uhrzeit entspricht und Anzeigen.
Falls ich das da oben Missverstanden habe, dann sorry

Gruss alfold
  Mit Zitat antworten Zitat
Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.739 Beiträge
 
Delphi 6 Enterprise
 
#5

AW: Anzeigen von Sendern(TV) sortiert nach Uhrzeit

  Alt 6. Mai 2011, 13:30
Die Aufgabenstellung hat ein bißchen was von einer Pivot-Tabelle. Gibts da nix?

Ansonsten erzeugt folgende Funktion SQL für eine Art Pseudo-Pivot-Tabelle:

Die Zeile
s.Add('Where day ='+DerGesuchteTag);
muss natürlich irgendwie angepasst werden.

Wenn Stundenzeiträume gewünscht werden wird das Ganze natürlich nochetwas komplizierter...

Delphi-Quellcode:
function TForm1.SQL_Main: String;
var s : TStringlist;
begin
  s:= TStringlist.Create;
  s.Add('SELECT UHRZEIT');

  s.Add(SQL_SenderZeit);

  s.Add('FROM');
  s.Add('(');
  s.Add('Select Distinct prg_begin as UHRZEIT From epg_program');
  s.Add('Where day ='+DerGesuchteTag);
  s.Add(') D');
  Result:=s.Text;
  s.Free;
end;


function TForm1.SQL_SenderZeit: String;
var
  s : TStringList;
  q : TADOQuery;
begin
  s := Tstringlist.Create;
  q := TADOQuery.Create(nil);
  q.Connection:= ;//hier eine ADO-Connection übergeben
  q.SQL.Add('Select id, name From epg_channels');
  q.Open;
  q.First;
  while not q.Eof do
    begin
    s.Add('(');
    s.Add('Select name From epg_program');
    s.Add('Where day = '+DerGesuchteTag);
    s.Add('And prg_begin = D.Uhrzeit');
    s.Add(') As '+q.fieldbyname('name').AsString);
    q.Next;
    if not q.Eof then s.Add(',')
    end
  Result:=s.Text;
  s.Free;
  q.Free;
end;
Ralph

Geändert von Jumpy ( 6. Mai 2011 um 14:10 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Cyberaxx
Cyberaxx

Registriert seit: 15. Jul 2005
311 Beiträge
 
Delphi XE5 Professional
 
#6

AW: Anzeigen von Sendern(TV) sortiert nach Uhrzeit

  Alt 6. Mai 2011, 15:20
Ja sie soll aufgebaut sein wie eine normale Programmzeitschrift.
Delphi-Quellcode:
---------------------------------------------------------------------
05:00 | 05:50 - 05:20 | 05:30 - 10:00 ... | 05:35 - 06:15
      | Wa are Family | Die dreisten drei | Die Nanny
---------------------------------------------------------------------
07:00 | 07:30 - 07:50 | 07:20 - 08:20 ... |
      | The Big Bang | Infomercials .... |
      | ............. | ................. |
      | 07:50 - 08:20 | ................. |
      | The Big Bang | ................. |
---------------------------------------------------------------------
08:00 |
Ich habs halt nun so gelöst das ich es als 24 einzelabfragen habe Begin >= '05:00' AND begin < '06:00'
Daniel
Das Aufwachen aus einem boesen Traum muss einen nicht erleichtern. Es kann einen auch erst richtig gewahr werden lassen, was man Furchtbares getraeumt hat, vielleicht sogar welcher furchtbaren Wahrheit man im Traum begegnet ist!
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:40 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz