Uruz

aloha

meine bescheidene meinung:

kann es sein, dass du zur Entwurfszeit im Objektinspektor deine "Datenbankkomponenten" geöffnet hast ? das funktioniert dann an deinem rechner in der Regel sehr gut vor allem aus Delphi heraus...

schliesse sie im Objektinspektor und im Ereignis OnFormShow kannst du ja reinhängen:

if not Table.Connected then

Table.Open;

... oder so ähnlich

Original geschrieben von frankos

Hi!

Die IHK stellt die Lösungen selbst ins Netz:

http://www.heilbronn.ihk.de/download/zwischenpr/1195H2.doc

cu, frankos

aehm... kurz am rande... die loesung ist zu 99% nicht von der IHK... seit wann ist eine GSM-Verbindung via Handy schneller als eine 2Mbit Standleitung ??? und da gibt es auch noch mehr als genug andere fragwuerdige Aussagen...

das ist uebrigens der gleiche "Loesungsbogen" wie in der Online-Abfrage der eigenen Ergebnisse...

Uruz

jau... war ich bloed...

hab im constructor das

inherited create

erst nach der initialisierung der neuen properties aufgerufen... nachdem ich das vorgezogen habe, hatte es geklappt...

mann mann mann... ich glaube, ich werde alt...

tststs

*schäm*

prinzipiell solltest du immer, wenn du dir via assignfile eine textdatei greifst, nicht nur via rewrite alles neu schreiben...

du solltest stets auch ein reset(textdatei) machen... evt auch mit einer entsprechenden "Schreibblockgröße"

z.B.

reset(textdatei,1)

dadurch hast du sichergestellt, dass der textpuffer immer leer geschrieben wird...

Uruz

schliesst du auch die verbindung zur Datenbank im form.close ? wenn ja, dann solltest du die im form.create auch wieder oeffnen... bzw. im "neuen" form.create muesstest du auch wieder

dm_bewertung.ds_fragen.active := true


[/PHP]

setzen

uruz

Aloha he...

da bin ich wieder nach langer langer Zeit... und prompt wieder mit einer Frage ;o)

ich habe eine Komponente (von TComponent abgeleitet) geschrieben und habe ihr drei properties unter published zugeordnet... die drei werden auch brav während der Entwurfszeit im Objektinspektor angezeigt, aber egal was ich da reinschreibe, die Daten werden zur Laufzeit nicht übernommen...

bin da im Augenblick echt mit meinem Latein am Ende... ist höchstwahrscheinlich was mehr als nur banales... aber ich komme zum verrecken ned drauf...

danke für die Hilfe

Uruz

aehm... Hotliner...

versuch die Frage noch einmal genau zu formulieren... denn im Augenblick werd ich da noch ned mal ansatzweise schlau draus...

jedenfalls... wenn du daten in einem array hast, kannst du auf diese daten nachher wesentlich einfacher drauf zugreifen... weil sie quasi in einer "reihe" auf dem queue liegen...

wird dadurch uebersichtlicher und einfacher...

Uruz

jupp... ist tatsaechlich so... es werden - trotz aller parentfont einstellungen - nicht alle schriftarten uebernommen...

und das primaer bei komponenten, die von tedit abgeleitet sind...

auch grids scheinen da ihre eigenen vorstellungen von zu haben

tststs

jedenfalls hab ich jetzt einen kleinen filescanner geschrieben, der mir alle verwendeten fonts auflistet und bei bedarf einen echten "Standardfont" setzt

dank dir

Uruz

Original geschrieben von toppy

Ähm hüstel wo müssen die liegen !? :confused:

Das war jetzt zu fachmännisch für mich ausgedrückt, also bitte net böse sein, wenn ich nerv.....

Das Formular, auf dem dein Eingabefeld liegt, hat eine Funktion wie FormCreate (nennt sich auch konstruktor bzw constructor)...

da musst du das dann rein schreiben ;o)

hab den der units und die anzeige der einzelnen komponenten im objektinspektor verglichen...

parentfont ist stets auf true...

die *.dfm dateien hab ich allerdings ned verglichen ;o)

Uruz

also... wir haben hier mehrer projekte, bei denen die werte fuer den font bei editboxen nicht immer uebernommen worden ist... das ist bei editboxen und bei einigen davon abgeleiteten klassen der fall...

nicht immer... und nicht bei jedem projekt... aber ein vergleich des quelltextes zeigte da keinerlei unterschiede.. evt. ein delphi-fehler ?

Uruz

ned wirklich...

editboxen und davon abgeleitete klassen uebernehmen den schrifttyp nur bedingt... heisst es ist uns bisher erst bei den elementen aufgefallen...

daher haben wir ja diesen komplexen schnickschnack gemacht...

;o)

Kinders... ich bin ja soooooooooooooooo bloed ...

ist viel einfacher als ich dachte... wenn ich unter Neu -> eine CLX-Anwendung auswaehle, werden alle dafuer benoetigten Units eingebunden... bzw. wird automatisch die richtige Unit verwendet... allerdings wird das ja wohl ned mit meinen bisher selbst implementierten Komponenten so klappen...

na mal schauen, wann ich meine QTools.pas rausbringe ;o)

danke trotzdem

Andi

scheint vielleicht albern zu klingen, aber... aehm... was haeltst du noch von einem else

mir scheint, du schreibst deine warnung... und versuchst anschliessend doch noch den inhalt in einen float wert umzuwandeln

;o)

Uruz

speichere den wert doch jedesmal in einer string variablen zwischendurch ab...

sowas wie

a = a + IntToStr(i)

oder so...

kenne die VB- Befehle ned so... aber mir scheint, dass du entweder die daten verkehrt rum selber in deinen Speicher schreibst oder dass der "Tastendruck"- Puffer mit First-In-Last-Out arbeitet...

bedeutet, er merkt sich den letzten Tastendruck und schiebt die anderen zeichen eins weiter...

uruz

arghl...

so was wollt ich echt ned machen... bin ja ein braver kerl ...

nee... geht um shortcuts, die auch bei minimierten programm nach wie vor aktiv sein sollen...

mit dem keyhook... nu ja... so was hab ich mir schon fast gedacht... nur schreib ich soo selten mal hooks... und aehm... partout will mir ned einfallen, wie das so funzt... *gruebel*

hast du evt. was quelltext-artiges oder beispielhaftes zur Hand ?

waer echt klasse...

dank dir

Uruz

das band das marc meint ist ein QRSubDetailBand und darauf platzierst du einfach dein label ;o)

kriegst das scho hin

uruz

Aloha

noch eine zweite Sache...

wir haben hier in unserer Firma inzwischen auch DElphi 6 in der Enterprise Ed. evt. wollen wir aber nu auch Anwendungen fuer die Linuxwelt erstellen... aber mal schauen...

nun ja... wie kann ich denn einen von TWinControl abgeleiteten TButton von einem von TWidgetControl abgeleiteten unterscheiden ? bzw. wie waehle ich denn einen TWidget-TButton aus ud setze ihn auf das Formular ?

*gruebel*

danke erneut

Uruz

Aloha Leute,

hab da wieder ein Problem *seufz*

also... wir wollen hier fuer jedes Control auf dem Formular (in der Anwendung) den gleichen Font verwenden...

Das Setzen von .ParentFont auf TRUE... bewirkt zu DesignTime nuescht... um nicht zu sagen... noch weniger... die Werte werden eben ned uebernommen...

bislang haben wir eine Schleife, die alle Komponenten durlaeuft und

  if (Controls[xy]  Is TEdit) then 

  begin

    (Controls[xy] as TEdit).Font       := Self.Font;

    (Controls[xy] as TEdit).ParentFont := TRUE;

  end; 

  if (Controls[xy]  Is TRadioButton) then

  ...

[/PHP]

Nun ja... Haken an der Sache: Das ganze ist mehr als unschoen... jetzt soll ich was daran aendern... und bin zuerst mal auf die Idee gekommen, unter TControls.Font nachzuschauen... da steht, das das funktionieren muesste... wenn man allerdings in die Eigenschaftentabelle von TControl hineinschaut, sieht man schnell, das Font als protected angegeben wird, und man es so nicht setzen kann... waer ja auch zu schoen gewesen...

und ebenso verhaelt es sich mit der property ParentFont... als protected definiert...

habt ihr da eine Idee ? Gibt es nicht eine globale Funktion, die alle Schriftarten auf eine von mir definierte festeinstellt ? oder habt Ihr da ganz andere Vorschlaege ?

jedenfalls danke erneut ;o)

Uruz

himpf...

also... bei mir sind auch die Menueitems, die nicht mit einer Funktion unterlegt sind, nicht ausgegraut... quasi sind auch diese Enabled... allerdings passiert auch nichts, wenn man "darauf klickt" (wie auch ?? ;o) )

hmm... keine ahnung... weiss da jetzt auch nuescht mehr zu..

*sorry*

werd aber weiter darueber nachdenken

Andi

aehm UNFUG !!!

ich habe zwar gerade eben meine Ausbildungsstelle auch via Aufloesungsvertrag gewechselt... und muss sagen, es war eien vernuenftige Entscheidung !

Also... du sagtest, zunaechst einmal Abbruch, um studieren gehen zu koennen... wenn du

a) das Studium erfolgreich absolvierst, kannst du danach die Ausbildung erneut beginnen...

oder

wenn du x Jahre (ich glaube 3, bin mir aber nicht sicher) nach dem abbruch erneut mit der gleichen Ausbildung anfangen willst, ist das quasi verjaehrt...

uruz

evt solltest du schreiben

Workbooks.Open quelle + datei1 ?

dann hast du definitiv auch die Pfadangabe...

Uruz

P.S.: k. A. was das fuer eine Programmiersprache sein soll... aber ich denke mal, dass das ein logischer Fehler sein koennte...

Aloha he...

da bin ich wieder ;o)

also... wieder mal eine feine Sache:

Wie kann ich unter Delphi Tastenkombinationen eincodieren, die auch bei minimierter Application, wenn der Focus auf einer ganz anderen Anwendung liegt, greifen ?

als gaaaaaaaaanz daemliches Beispiel, ich habe einen Mailclient geschrieben und will, wenn ich gerade in Excel oder sonstwo bin, explizit via Tastendruck meine Mailbox checken...

am besten ohne den Focus auf die aktuelle Anwendung zu verlieren...

Ich dachte da eigentlich an Callback- Funktionen... aber wie muesst ich die dann implementieren ? (Hab derzeit noch weniger bis gar kaum Erfahrung mit Callbackfunktionen in dem Stil gemacht)...

Danke

Uruz

hm... ich hab damit bisher keine Probleme gehabt... setzt du evt. die Menueeintraege via Flag ? oder alles zur DesignTime im Objektinspektor schon auf Enabled ?

Uruz

bin zwar kein VB- Mensch aber... was haeltst du denn von einem Counter, der dir die Anzahl der unbrauchbaren Zeilen angibt ?

so das du dann (vereinfachte Darstellung)

for i := 0 to SourceGrid.Lines.Count - 1 do

begin

  if Filter(SourceGrid.Lines[i]) then

    FilterCount := FilterCount +1;

  else

    copy(DestGrid.Lines[i-FilterCount],SourceGrid.Lines[i]);

end;

wie gesagt, so aehnlich muesst das auch in VB ausschauen... nur hab ich das noch ned wirklich gemacht... BASIC hatte ich mit gwBasic an den Nagel gehaengt ;o)

aber ich denke, der Text oben ist verstaendlich

Uruz