VCL (C++ Builder)

• 

  Optionen Dialog erstellen
  • Burkhi  

  3
  0
  Stimmen
  3
  Beiträge
  946
  Aufrufe

  

  Vielen Dank, die JvPageList ist genau das, was ich gesucht habe.
• I

  TColorBox OnDblClick implementieren ????
  • int02h  

  1
  0
  Stimmen
  1
  Beiträge
  580
  Aufrufe

  I

  Hallo, ich würde gerne bei der TColorBox ein onDblClick-Ereignis implementieren unter BCB6, um dann mit einem ColorDialog eine eigene Farbe zu definieren. Leider klappt das nicht. Wenn man "DoubleClick"ed, geht ColorBox auf und zu, egal wie schnell mal doppelt klickt. Das Ereignis feuert einfach nicht. Hat jemand einen Rat für mich? Gruß
• C

  k8055 Ereignis für Eingänge
  • ChrisX1984  

  7
  0
  Stimmen
  7
  Beiträge
  1191
  Aufrufe

  M

  Ok, das hättest Du ja aus der CBuilder Beispiel Application fast 1:1 übernehmen können: void __fastcall TForm1::Timer1Timer(TObject *Sender) { Timer1->Enabled = false; // long Data1; // long Data2; long i; // ReadAllAnalog(&Data1, &Data2); // AD1->Position = Data1; // AD2->Position = Data2; // Label4->Caption = IntToStr(Data1); // Label5->Caption = IntToStr(Data2); // Counter1->Text = IntToStr(ReadCounter(1)); // Counter2->Text = IntToStr(ReadCounter(2)); i = ReadAllDigital(); CheckBox3->Checked = (i & 1)>0; CheckBox4->Checked = (i & 2)>0; CheckBox5->Checked = (i & 4)>0; CheckBox6->Checked = (i & 8)>0; CheckBox7->Checked = (i & 16)>0; Timer1->Enabled = true; } Der Timer im Beispiel ist auf 50ms eingestellt.
• C

  Hilfe mit Memos
  • Cpplernoob  

  6
  0
  Stimmen
  6
  Beiträge
  924
  Aufrufe

  A

  Hallo Kurze Erklärung : Die GUI wird erst nach dem Ende deiner Methode aktualisiert. Deshalb wird auch dein Memo nicht schon bei jedem einzelnen Buchstaben aktualisiert, sondern erst wenn alles fertig ist. Der von dir gewünschte Effekt ist nicht zu sehen. Mit der Anweisung Application->ProcessMessages();. kannst du innerhalb deiner Methode jederzeit erzwingen, das die GUI aktualisiert wird. Das könntest du also nach jedem einzelnen Buchstaben und vor jedem folgendem Sleep machen. Weiter Erklärungen, auch zu Timer, findest du über die Suchfunktion und die Builder-Hilfe. bis bald akari
• M

  Hook und Tastenabfrage
  • Mucher  

  5
  0
  Stimmen
  5
  Beiträge
  1061
  Aufrufe

  M

  Super. Danke. Jetzt klappts. Hatte deinen ersten Beitrag übrigens falsch gelesen/verstanden.... Aber beim zweiten lesen wurds mir klar Trotzdem vielen Dank für deine anschaulichen W Beispiele
• D

  Gif animation in mein C++ projekt einzubauen
  • DeadManWalkin  

  4
  0
  Stimmen
  4
  Beiträge
  1118
  Aufrufe

  D

  Bei mir geht: - GifImage installieren - "Dem Projekt hinzufügen" wählen und GifImage.pas aktivieren - #include "GIFImage.hpp" dan Compilieren-> Voila Gruss Frank
• I

  TListView Column Header multiline / mehrzeilig
  • int02h  

  4
  0
  Stimmen
  4
  Beiträge
  2089
  Aufrufe

  A

  Versuch's doch mal mit einer anderen Komponente. Ich habe mehrzeilige Header schon mit NextGrid (-> BergSoft) benutzt, das ich auch sonst empfehlen kann. Weiter eines Blickes wert wären KGrid und Virtual TreeView.
• T

  Zelle in TLMDListBox selektieren???
  • torsten_156  

  1
  0
  Stimmen
  1
  Beiträge
  490
  Aufrufe

  T

  Hallo, ist es möglich, in einer LMDListBox eine einzige Zelle zu selektieren? Und das nach möglichkeit noch mit einem rechten Mausklick? Ich kann leider immer nur eine ganze Zeile markieren... Danke und Gruß Torsten
• P

  Platzierung berechnen (Sportauswertung)
  • Prominenter  

  1
  0
  Stimmen
  1
  Beiträge
  1089
  Aufrufe

  P

  Hi@all Ich benötige ein bischen Hilfe für eine Auswertungsberechnung. Aufgabe: Ich habe eine Tabelle mit mehreren Werten und möchte nun die Reihenfolge berechnen. (Sportwettkampf) |Name|W1|W2|W3|W4|W5|W6|W7|Punke|Platz|Min|Max|Gesamt|+|-| In W1-W7 werden Einzelpunkte eingegeben. MIN/MAX sind jeweils die MIN/Max Werte von W1-W7 Gesamt errechnen sich aus W1-W7. Punkte errechnen sich aus W1-W7 abzüglich Min und Max. Jetzt soll anhand der Punkte eine Platzierung ermittelt werden. Ich sortiere also die Tabelle nach Punkten und vergebe so Platzierungen. Höchste Punktzahl = Höchste Platzierung usw. Problem: Wenn Punktgleichheit, soll bei den Punktgleichen die Gesamtsumme aller Punkte verglichen werden und die Platzierung entsprechend angepasst werden = höhere Gesamtwertung dann höherer Platz auf Basis des Platzes von Summe. Dafür soll ein +/- in einer zusätzliche Spalte abgelegt werden. Wenn immernoch Punktgleichheit nach Gesamtpunkten dann gleicher Platz und Nachfolgeplatz wird gestrichen. Ich hoffe das war verständlich. Zur verdeutlichung habe ich folgende Tabelle mal als Beispiel: http://www.concepts-multimedia.de/beispiel.jpg Ich arbeite mit BCB - ADO Komponenten (Connection/Table) - DBGrid. Wie gesagt, bis zur Berechnung der Punkte funktioniert alles. Ich brauche nur noch die ordentliche Platzierungsberechnung. Hier mal mein erster Ansatz. void Platzierung(TObject *Sender, int lastData) { if(TADOTable* Table = dynamic_cast<TADOTable*>(Sender)) { // aktuellen Datensatz ermitteln lastData = Table->RecNo; // Tabelle nach Punkten sortieren Table->Sort = "Punkte DESC"; //Platz eintragen int platz = 0; int wertvorher = 1000; int gesamtvorher = 1000; // Anzahl der Zeilen auslesen int count = Table->RecordCount; // Auf erste Zeile setzen Table->First(); // Alle Zeilen durchlaufen for (int i=1; i<count; i++) { // Beginnen bei der ersten Table->RecNo = i; Table->Edit(); Table->FieldByName("Platz")->Clear(); // Punktzahle einlesen int wert = Table->FieldByName("Punkte")->AsInteger; // Gesamtpunktzahl einlesen int gesamt = Table->FieldByName("Gesamt")->AsInteger; // wenn Punktzahl != 0 if (wert != NULL && wert != 0) { // Wenn Punktzahl gleich vorheriger Punktzahl if (wert == wertvorher) { // Gesamtwerte vergleichen // Wenn Gesamt und vorheriger Gesamtwert gleich = gleicher Platz, Platzzahl um eins erhöhen if (gesamt == gesamtvorher) { Table->FieldByName("Platz")->Value = platz; platz++;} // wenn Gesamt größer als vorheriger Gesamtwert if (gesamt > gesamtvorher) { // bekommt dieser den aktuellen Platz Table->FieldByName("Platz")->Value = platz; // und der vorherige den nächst hörheren Platz platz++; Table->RecNo = i-1; Table->FieldByName("Platz")->Value = platz; Table->RecNo = i; } // wenn Gesamt niedriger als vorheriger if (gesamt < gesamtvorher) { // bekommt dier den nächst höheren Platz platz++; Table->FieldByName("Platz")->Value = platz; } } // wenn keine gleiche Punktzahl dann nächst höherer Platz else { platz++; Table->FieldByName("Platz")->Value = platz; } } // Die aktuellen Werte als Vorherwerte merken wertvorher = wert; gesamtvorher = gesamt; // Tabelle speichern Table->Post(); } // Wenn aAlle Zeilen durchlaufen sind Tabelle neu laden wegen der Ausgangssortierung Table->Close(); Table->Open(); //DBGrid1->Refresh(); //letzten Datensatz anzeigen Table->RecNo = lastData; } } // Ende Platzierung berechnen Was halt noch nicht klar ist, Platzierung bei mehrerer Punktgleichheit unter Berücksichtigung oben beschriebener Kriterien. Ausserdem bekomme ich ständig verschiedene Fehlermeldungen wie: --------------------------- Benachrichtigung über Debugger-Exception --------------------------- Im Projekt Turnier.exe ist eine Exception der Klasse EOleException mit der Meldung 'Die Schlüsselspalteninformationen sind ungenügend oder inkorrekt. Es sind zu viele Zeilen von der Aktualisierung betroffen' aufgetreten. --------------------------- Anhalten Fortsetzen Hilfe --------------------------- und Benachrichtigung über Debugger-Exception --------------------------- Im Projekt Turnier.exe ist eine Exception der Klasse EOleException mit der Meldung 'Überlauf bei numerischem Feld' aufgetreten. --------------------------- Anhalten Fortsetzen Hilfe --------------------------- sowie --------------------------- Benachrichtigung über Debugger-Exception --------------------------- Im Projekt Turnier.exe ist eine Exception der Klasse EOleException mit der Meldung ''(Ausdruck)' kann nicht aktualisiert werden; Feld nicht aktualisierbar' aufgetreten. --------------------------- Anhalten Fortsetzen Hilfe --------------------------- Vielen Dank für eine Hilfe. Thx@all
• R

  Projekt läuft nicht auf neuem 6-Core m. Win7 64 --- Gelöst ---
  • rudiM  

  13
  0
  Stimmen
  13
  Beiträge
  2666
  Aufrufe

  R

  Hallo, Es war tatsächlich das 147. Objekt. Es ist ein TLMDEdit von LMD-Tools. Ich hatte diesem Editfeld einen SpezialButton zugeordet, aber im Programm noch nicht verwendet. Nach Entfernung nur dieses Buttons liefs wieder rund. Dies war im gesamten Projekt jedoch der einzige Button dieser Art, so dass ich nicht sagen kann, wer der eigentliche Auslöser war, LMDTools, BCB oder ich. Jetzt aber extra schöne Weihnachten :xmas2: :xmas2: :xmas2: :xmas1: Rudi
• ?

  ADOConnection. Providerliste
  • Gast  

  2
  0
  Stimmen
  2
  Beiträge
  647
  Aufrufe

  ?

  Hat sich erledigt: GetProviderNames(TStrings *Names);
• ?

  Auswahl-Rechteck zeichnen
  • Gast  

  2
  0
  Stimmen
  2
  Beiträge
  1234
  Aufrufe

  V

  Dafür brauchst du kein 2. Image du kannst auch per Gummiband-Effekt die Auswahl direkt in das Image zeichnen. http://docwiki.embarcadero.com/RADStudio/d//index.php/Beispiel:_Der_Gummiband-Effekt
• M

  Tabellendaten nach Excel exportieren
  • MichelM  

  11
  0
  Stimmen
  11
  Beiträge
  4521
  Aufrufe

  P

  Hi@all Ich hab das mal auch bei mir ausprobiert, bekomme allerdings einen Fehler: --------------------------- Benachrichtigung über Debugger-Exception --------------------------- Im Projekt Turnier.exe ist eine Exception der Klasse EOleException mit der Meldung 'OLE-Fehler 800A03EC' aufgetreten. --------------------------- Anhalten Fortsetzen Hilfe --------------------------- an dieser Stelle: Variant WorkSheets = Excel.OlePropertyGet("Worksheets"); Variant WorkSheet = WorkSheets.OlePropertyGet("Item", 1); Thx@all
• R

  BCB2009 registrieren
  • rudiM  

  6
  0
  Stimmen
  6
  Beiträge
  1492
  Aufrufe

  J

  Bzgl. des 6-Core W7-64 Problems geht es hier weiter: http://www.c-plusplus.net/forum/279201
• J

  Komponentenentwicklung Laufzeit, Entwurfzeit
  • JBOpael  

  2
  0
  Stimmen
  2
  Beiträge
  732
  Aufrufe

  J

  http://www.c-plusplus.net/forum/118221 ?
• T

  Zwei Spalten einer ListBox aus Text-Datei füllen
  • torsten_156  

  3
  0
  Stimmen
  3
  Beiträge
  1342
  Aufrufe

  T

  Hi sonic_1233, die Struktur der Datei möchte ich nicht ändern, da diese Informationen nicht so wie geschrieben in der Datei zu lesen sind. Denn ich werde diese verschlüsselt abspeichern. Damit niemand auf die Idee kommen kann, wo denn ein Zeilenpaar anfängt/endet, möchte ich diese so wie geschrieben abspeichern. Aber Danke für den Tip... Gruß Torsten
• ?

  drag and drop innerhalb einer listview
  • Gast  

  3
  0
  Stimmen
  3
  Beiträge
  1161
  Aufrufe

  ?

  vielen dank!! hat geholfen!
• P

  Führende Null ???
  • Prominenter  

  2
  0
  Stimmen
  2
  Beiträge
  741
  Aufrufe

  ?

  So was kann man in der Datenquelle, respektive (sofern verwendet) im Feldeditor, unter DisplayFormat einstellen.
• ?

  Problem mit Windows Programmierung....
  • Gast  

  6
  0
  Stimmen
  6
  Beiträge
  922
  Aufrufe

  A

  Hallo Dann must du dich aber auch noch manuell um die Fehlerbehandlung kümmern, wenn in den Edits kein Text steht der in eine Zahl umwandelbar ist. Dafür reicht es auch schon, wenn das Edit leer ist. Dann kommt bei ToInt nämlich eine Exception, die ohne Behandlung dein Programm beendet. StrToIntDef hat eine solche Behandlung schon eingebaut. bis bald akari
• P

  Überlauf bei numerischem Feld
  • Prominenter  

  3
  0
  Stimmen
  3
  Beiträge
  926
  Aufrufe

  R

  Hallo, ADOTable1->FieldByName("Platz")->Clear(); if ( ADOTable1->FieldByName("Punkte")->Value != 0 ) diese Zeilen halte ich mal für überflüssig. Wer keine Punkte hat, landet halt unten oder oben, je nachdem. Ich bin auch nicht sicher ob RecNo mit der Sortierreihenfolge übereinstimmt. Gruß Rudi