VCL (C++ Builder)

• B

  komishce Initialisierung meines Char Arrays?
  • burkut  

  7
  0
  Stimmen
  7
  Beiträge
  1770
  Aufrufe

  B

  Danke Akari. Es hat mir viel geholfen...
• S

  eigenr Zeichensatz über Buttons -> Edit
  • Smitty  

  3
  0
  Stimmen
  3
  Beiträge
  726
  Aufrufe

  S

  Oops, wohl etwas missverständlich ausgedrückt. Das mit den Buttons funktioniert innerhalb von ASCII, also bei Zeichen < 128. Mich interessiert jetzt der Rest, also > 127. Also grob gesagt: Wie kann die Eingabe in ein Edit über ALT+nnn simuliert werden? p.s. Im Edit wird natürlich kein selbsgebastelter Smiley angezeigt, dafür gibts ein TImage. Nur zur Verdeutlichung. grüssle
• 

  Schreibaufwand veringern
  • 5cript  

  12
  0
  Stimmen
  12
  Beiträge
  1800
  Aufrufe

  B

  Auch wenn es hier vielleicht keine Rolle spielt, der Test mit dynamic_cast ist um einigens schneller als über Classname (ist getestet).
• B

  wie kann ich usigned Short zu Char konvertieren?
  • burkut  

  6
  0
  Stimmen
  6
  Beiträge
  1083
  Aufrufe

  

  sfsdffdg schrieb: burkut schrieb: unsiged short. danke inzwischen habe ich es erledigt. wie nett von dir dass du deine lösung preis gibst... rein theoretisch: unsigned short value; char C = char(value); sonic_1233 schrieb: unsigned short: 16-Bit-Integer ohne Vorzeichen char: 8-Bit-Zeichen ohne Vorzeichen Wenn du unsigned short nach char konvertierst, dann wirst du doch Daten verlieren. Oder sehe ich das falsch? der Wert von unsigned short sollte natürlich sinnvoll umwandelbar sein (zwischen 0 und 255 bzw 0 und 127, da signed char), wenn der wert 1000 ist, ist das nicht sehr sinnvoll. nebenbei müsste in unsigned char gecastet werden, oder es sich um signed short handeln. Aber da ich nichts zu den Zielen, des Threadstarters weiß enthalte ich mich in diesem punkt.
• S

  Text in einer Binäerdatei speichern
  • sonic_1233  

  5
  0
  Stimmen
  5
  Beiträge
  923
  Aufrufe

  S

  Vielen Dank
• R

  C++ Builder 2010 Upgrade Lizenz gesucht
  • regexp  

  3
  0
  Stimmen
  3
  Beiträge
  895
  Aufrufe

  R

  Vielen Dank für den Tip! Habe mir das eben installiert. Leider verändern die cnWizards aber nichts am nicht richtig funktionierenden Code-Folding oder ich finde die Einstellung nicht. Wird eine Datei gespeichert, geschlossen und wieder geöffnet, sind die foldings nach wie vor verloren.
• ?

  Anzahl Datensätze auslesen
  • Gast  

  3
  0
  Stimmen
  3
  Beiträge
  762
  Aufrufe

  ?

  hab das jetzt mit Query->RowsAffected gelöst!
• N

  Borland c++ builder 2006 , MySql 5.1, dbexpress; Probleme mit der TSQLQuery Componente
  • nettekov  

  5
  0
  Stimmen
  5
  Beiträge
  2851
  Aufrufe

  N

  Ich habe einbfach in eine neue VCL-Formular anwendung erstellt. Auf dem Formular habe folgende komponenten eingefügt. - TSQLConnection SQLConnenction1 (wurde hier auch schon mit der neue DLL aktualisiert: dbxopenmysql50.dll). Verbindung zum MYsql funktioniert einwandfrei, sowohl in der Entwurfsansicht als auch später im Programm. - TSQLQuery SQLQuery1 : SQLQuery ist über SQLConnection mit der SQLConnection1 verlinkt. Über den Objektinspektor gebe ich in der Eigenschaft SQL den SQL-Befehl ein und wenn ich jetzt mit AActive den SQL-Befehl senden will bekomme ich die Probleme- SELECT vornahme, id FROM tblTest ---> SQLQuery: Feldname fehlt. SELECT id FROM tblTest ---> Funktioniert. Habe auch mit nach der Fehleranweisung:'SQLQuery: Feldname fehlt.' kein Erfolg. Weiter habe ich noch ein Button1 und ein Memofeld eingefügt, um dies auch säter im Programm zuz testen. Hier ist der Quellcode zum Button: void __fastcall TForm1::Button1Click(TObject *Sender) { SQLConnection1->LoginPrompt = false; SQLConnection1->Connected = true; SQLQuery1->SQL->Clear(); SQLQuery1->SQL->Add("SELECT vornahme, id FROM tblTest;"); SQLQuery1->Open(); SQLQuery1->First(); while( SQLQuery1->Eof == false ) { int i=SQLQuery1->Fields->Count; Memo1->Lines->Add( SQLQuery1->FieldByName("vornahme")->AsString ); SQLQuery1->Next(); } } Gibt es vielleicht ein eine Andere MySql-Zugriffkomponente für den c++Builder 2006? Ich möchte einfach nur ein paar SELECT, INSERT, UPDATE oder DELETE Befehlt versenden können. Viele Dank Gruss nettekov
• ?

  Text von Editfeld in Datei speichern
  • Gast  

  4
  0
  Stimmen
  4
  Beiträge
  2106
  Aufrufe

  ?

  danke für eure Antworten!
• H

  Dynamisch erzeugte Elemente verschwinden auf PageControl
  • Heimelchen  

  3
  0
  Stimmen
  3
  Beiträge
  873
  Aufrufe

  H

  Hab ich vergessen: das hatte ich probiert und hat nicht funktioniert. Es muss irgendetwas mit der Schow-Funktion zu tun haben. Packe ich das in die FormCreate-Methode, wird alles dargestellt.
• H

  Indexverknüpfung von DBComboBox
  • Heimelchen  

  3
  0
  Stimmen
  3
  Beiträge
  697
  Aufrufe

  H

  Also ich hab auch schon ne DBLookupComboBox gefunden, die sich ja prinzipiell so anhört, als ob sie das tut, was ich will. Aber ich hab's nicht geschissen gekriegt, die zu konfigurieren. Das Problem ist, dass die LookupTable selbst auch aus einem Dataset kommt. Und wie leg ich sowas lokal an??? Ich möchte schon gerne bei den DB-Blöcken bleiben, damit ich nichts mehr drumrum programmieren brauch...
• M

  Datensätze per CheckListBox auswählen und kopieren
  • maikmueller  

  1
  0
  Stimmen
  1
  Beiträge
  617
  Aufrufe

  M

  Hallo! Ich habe eine CheckListBox welche mit verschiedenen Datensätzen gefüllt wird. Nach dem ich dort die gewünschten Datensätze selektiert habe werden diese in eine leere Tabelle kopiert. Markiere ich alle Datensätze funktioniert es wunderbar. Markiere ich nur einzelne Datensätze macht das Programm mist, obwohl der Inhalt der StringList stimmt. Hier mal mein Code: Hier werden die CheckListBoxen gefüllt... void __fastcall Tf_abrechnung_automaten_waehlen::FormShow(TObject *Sender) { if (CheckListBox1->Count == 0) { for (int i = 0; i < f_start->ADOQuery1_Automatenverwaltung->RecordCount; i++) // CheckListBox1 fuellen { if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD_ABRECHNUNG")->AsInteger > 0) // Pruefen ob Automat vorgemerkt ist { ListBox4->Items->Add("Ja"); } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD_ABRECHNUNG")->AsInteger == 0) // Pruefen ob Automat vorgemerkt ist { ListBox4->Items->Add("Nein"); } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsCurrency == 0) // Pruefen ob Saldo2 vorgemerkt ist { RichEdit1->Lines->Add("0.00 €"); } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsCurrency < 0 || f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsCurrency > 0) // Pruefen ob Automat vorgemerkt ist { RichEdit1->Lines->Add(FloatToStrF (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsFloat, ffCurrency, 7, 2)); } CheckListBox1->Items->Add (f_start->ADOQuery1_Automatenverwaltung->FieldByName("TYP") ->AsString); ListBox1->Items->Add (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("BEZEICHNUNG")->AsString); ListBox2->Items->Add (f_start->ADOQuery1_Automatenverwaltung->FieldByName("SNNR") ->AsString); ListBox3->Items->Add (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("DATUM_KD_ABHOLUNG")->AsDateTime); f_start->ADOQuery1_Automatenverwaltung->Next(); } } } Und hier werden die Datensätze selektiert... void __fastcall Tf_abrechnung_automaten_waehlen::CheckListBox1Click(TObject *Sender) { // Stringliste erstellen f_abrechnung->pGewaehlteAutomaten->Clear(); // Stringliste leeren for (int i = 0; i < CheckListBox1->Count; i++) // Stringliste fuellen { if (CheckListBox1->State[i]) { f_abrechnung->pGewaehlteAutomaten->Add(ListBox2->Items->Strings[i]); } } } Und hier werden die selektierten Datensätze kopiert... // An ersten Datensatz springen for (int x = 0; x < pGewaehlteAutomaten->Count; x++) { if (pGewaehlteAutomaten->Strings[x] == f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SNNR")->AsString) { // Tabelle Abrechnung_Erfassung mit Daten fuellen ADOTable2->Insert(); if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD_ABRECHNUNG")->AsInteger > 0) // Automat ist vorgemerkt { ADOTable2->FieldByName("NR_KD") ->AsInteger = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD_ABRECHNUNG")->AsInteger; pVorgemerkteAutomaten->Add (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SNNR")->AsString); // Kundennummer merken und Automat aus Liste der vorgemerkte loeschen } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD")->AsInteger > 0) // Automat ist nicht vorgemerkt { ADOTable2->FieldByName("NR_KD") ->AsInteger = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD")->AsInteger; } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD")->AsInteger == 0) // Automat ist vorgemerkt { ADOTable2->FieldByName("NR_KD") ->AsInteger = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD_ABRECHNUNG")->AsInteger; } ADOTable2->FieldByName("NR_KD_ABRECHNUNG") ->AsInteger = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("NR_KD_ABRECHNUNG")->AsInteger; if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsCurrency < 0 || f_start->ADOQuery1_Automatenverwaltung->FieldByName("SALDO2_VORGEMERKT")->AsCurrency > 0) { ADOTable2->FieldByName("KASSENINHALT") ->AsCurrency = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsCurrency; } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SALDO2_VORGEMERKT")->AsCurrency == 0) { ADOTable2->FieldByName("KASSENINHALT")->AsCurrency = 0; } ADOTable2->FieldByName("MWST_SPIELER")->AsCurrency = 0; ADOTable2->FieldByName("NETTO")->AsCurrency = 0; ADOTable2->FieldByName("VERG_STEUER")->AsCurrency = 0; if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("GEBUEHR_KD")->AsCurrency == 0) { ADOTable2->FieldByName("GEBUEHR") ->AsCurrency = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("GEBUEHR_KD_ABHOLUNG")->AsCurrency; } if (f_start->ADOQuery1_Automatenverwaltung->FieldByName ("GEBUEHR_KD")->AsCurrency > 0) { ADOTable2->FieldByName("GEBUEHR") ->AsCurrency = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("GEBUEHR_KD")->AsCurrency; } ADOTable2->FieldByName("VERBLEIB_ABRECHNUNG") ->AsCurrency = 0; ADOTable2->FieldByName("PROZENT")->AsCurrency = 0; ADOTable2->FieldByName("ANTEIL_WIRT")->AsCurrency = 0; ADOTable2->FieldByName("GERAETE_NR") ->AsString = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("SNNR")->AsString; ADOTable2->FieldByName("TYP") ->AsString = f_start->ADOQuery1_Automatenverwaltung->FieldByName("TYP") ->AsString; ADOTable2->FieldByName("LNR_ABRECHNUNG") ->AsInteger = iLaufendeNummerAbrechnung; ADOTable2->FieldByName("AUSZAHLUNG")->AsCurrency = 0; if(f_start->ADOQuery1_Automatenverwaltung->FieldByName("PROZENT_WIRT")->AsInteger == 0) { ADOTable2->FieldByName("PROZENT_WIRT") ->AsFloat = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("PROZENT_WIRT_VORGEMERKT")->AsFloat; } if(f_start->ADOQuery1_Automatenverwaltung->FieldByName("PROZENT_WIRT")->AsInteger > 0) { ADOTable2->FieldByName("PROZENT_WIRT") ->AsFloat = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("PROZENT_WIRT")->AsFloat; } ADOTable2->FieldByName("BEZEICHNUNG") ->AsString = f_start->ADOQuery1_Automatenverwaltung->FieldByName ("BEZEICHNUNG")->AsString; ADOTable2->FieldByName("VERG_STEUER_WIRT")->AsCurrency = 0; ADOTable2->FieldByName("MWST_ANTEIL_WIRT")->AsCurrency = 0; if (f_start->ADOQuery1_Kundenverwaltung->FieldByName ("LETZTE_ABRECHNUNG_GS")->AsString == "") { ADOTable2->FieldByName("DATUM_VON") ->AsString = "01.01.2010"; DBGrid1->Columns->Items[1]->ReadOnly = false; } else { ADOTable2->FieldByName("DATUM_VON") ->AsString = f_start->ADOQuery1_Kundenverwaltung ->FieldByName("LETZTE_ABRECHNUNG_GS")->AsDateTime; DBGrid1->Columns->Items[1]->ReadOnly = false; } ADOTable2->FieldByName("DATUM_BIS") ->AsString = DateToStr(Date()); if(f_start->ADOQuery1_Automatenverwaltung->FieldByName("DATUM_KD_ABHOLUNG")->AsDateTime > "01.01.2010") { ADOTable2->FieldByName("DATUM_BIS") ->AsString = f_start->ADOQuery1_Automatenverwaltung->FieldByName("DATUM_KD_ABHOLUNG")->AsDateTime; } ADOTable2->FieldByName("VERG_STEUER_VORGEMERKT")->AsInteger = f_start->ADOQuery1_Automatenverwaltung->FieldByName("VERG_STEUER_VORGEMERKT")->AsInteger; ADOTable2->FieldByName("GUTSCHRIFT")->AsCurrency = 0; ADOTable2->Post(); f_start->ADOQuery1_Automatenverwaltung->Next(); } } Wäre nett wenn mir jemand auf die Sprünge helfen könnte, ich kann hier nämlich keinen Fehler finden... LG Maik
• B

  C++ Builder: Online-Update-Prüfung einbauen?
  • bergwerkzwerg  

  12
  0
  Stimmen
  12
  Beiträge
  2275
  Aufrufe

  B

  Ja, die Fehler kamen erst nach dem Einbinden und nein, mehr hab ich nicht eingebunden. Ich verwende übrigens den C++ Builder 2010. Ich hab das Projekt dann nochmal komplett neu erstellt und den Indy-HTTP-Client auf das Form gezogen, so wie du es gesagt hast. Dabei inkludiert er mir automatisch die benötigten Header. Das Ganze führte aber wie gesagt leider nicht zum Erfolg, die Fehler waren immer noch die gleichen. Ich hab aber eine (suboptimale) Lösung gefunden: Stelle ich die Build-Konfiguration auf "release", dann funktioniert es. Sobald ich aber wieder "debug" verwende, kommt es wieder zu den besagten Fehlern.
• H

  DBCheckBox-Klick simulieren
  • Heimelchen  

  7
  0
  Stimmen
  7
  Beiträge
  1176
  Aufrufe

  H

  Und genau das war die Frage. Kann man die DataSource oder ADOTable irgendwie so einstellen, dass es ausreicht oder oder oder...
• P

  Verzögerung die auf Tastendrücke reagiert
  • Psychedelixx  

  12
  0
  Stimmen
  12
  Beiträge
  17151
  Aufrufe

  P

  Noch mal eine Frage... wenn ich jedes Mal die Schlange neu zeichne, flackert logischerweise die Paintbox... wie kann ich das umgehen?
• H

  Nach Projektkonvertierung von Borland 5 zu CodeGear2009 Frames weg
  • Heimelchen  

  3
  0
  Stimmen
  3
  Beiträge
  754
  Aufrufe

  H

  Das hilft!
• 

  Monitorpositionen
  • 5cript  

  6
  0
  Stimmen
  6
  Beiträge
  1263
  Aufrufe

  

  Vielen Dank, das Beispielprogramm (sicher hattest du das schon rumliegen, siehe quotations) zeigt genau das was ich brauche und suchte. Folgendes Löst das Positionsproblem: Screen->Monitors[i]->BoundsRect.Left Screen->Monitors[i]->BoundsRect.Top Screen->Monitors[i]->BoundsRect.Right Screen->Monitors[i]->BoundsRect.Bottom Hab mir das ganze mal genauer angesehen (muss ich in der Hilfe wohl übersehen haben) Das ist für mich auch einigermaßen wichtig, da mir das sicher immer wieder über den Weg laufen wird.
• H

  GUI dynamisch aufbauen
  • Heimelchen  

  10
  0
  Stimmen
  10
  Beiträge
  1393
  Aufrufe

  H

  Jetzt hab ich doch noch was: Ich verwende PageControl, wobei die Show-Funktion meine CheckBoxes erzeugt. Das führt interessanterweise dazu, dass die gesamte GroupBox (parent) nicht sichtbar wird. Nehme ich die GroupBox als parent raus oder rufe die Funktion beispielsweise per Button auf, ist sie wieder da. Auch wenn ich die Registerkarte wechsle und wieder zurückkehre, ist alles da. Nur beim Programmstart ist nix zu sehen.
• J

  Com Port auslesen
  • JBOpael  

  4
  0
  Stimmen
  4
  Beiträge
  5114
  Aufrufe

  M

  ohne Iteration: void __fastcall TSerial::GetPortList(TStrings *PortList) { PortList->Clear(); std::auto_ptr<TRegistry> Reg(new TRegistry()); std::auto_ptr<TStrings> ValueNames(new TStringList()); Reg->RootKey = HKEY_LOCAL_MACHINE; if (Reg->OpenKeyReadOnly("\\HARDWARE\\DEVICEMAP\\SERIALCOMM")) { Reg->GetValueNames(ValueNames.get()); for (int i=0;i<ValueNames->Count;++i) { String KeyName = ValueNames->Strings[i]; if ( Reg->ReadString(KeyName) != "" ) { PortList->Add(Reg->ReadString(KeyName)); } else break; } Reg->CloseKey(); } else throw Exception("konnte COM-Ports aus Registry nicht lesen"); }
• 

  [gelöst] EventHandler Closures an anderes Objekt als Formular binden
  • DocShoe  

  4
  0
  Stimmen
  4
  Beiträge
  1849
  Aufrufe

  

  audacia schrieb: Das geht so: THandler* myHandler = ...; Button->OnClick = myHandler->OnClick; Das kann manchmal so einfach sein... Vielen Dank.