Office: (Office 2003) Endlosformular, indivduelle Höhe Detailbereich je DS, Workaround?

\@Josef

So weit ich das noch weiss, hatte ich damals einige Lösungen aus dem Internet probiert. Darunter auch die mit den UF's.
Mein Fazit damals (das war im Jahr 2005) war, dass ich mit meiner Lösung am besten an das gewünschte Ergebnis herankam.

Mouse

 

Vielleicht kannst du ja mal ein Beispiel erzeugen *Smilie

Da würde sich sicherlich nicht nur ich sich freuen, es gibt hier ja ein Beispiel-Archiv ....

 

Wenn ich mal Zeit und Musse hab, werde ich die Sachen raussuchen und eine Musterversion erstellen.
Wann das sein wird steht aber in den Sternen (Chef schaut schon andauernd was ich hier mache)*boah

Mouse

 

So, ich war mal fleissig und hab da was erstellt. allerdings ist da noch nicht die Routine drinn für das Ändern von Daten. Schauts euch mal an.

(Erstellt in Acc2007 aber als 2003 Version gespeichert)

Mouse

 

sieht doch auch sehr gut aus, ich bekomme allerdings ein paar Fehlermeldungen bzgl. der Größe von Steuerelementen aber wenn das bei dir so funktioniert sollte man das ja auch hinbekommen.

Bekommst du es wann auch immer noch hin die Routine für das Ändern von Daten einzubauen ?

Dann könnte man mal die Geschwindigkeit der Lösung mit den Ufos mit der mit den Textfeldern vergleichen ....

 

Geliefert wie bestellt *Smilie

Mouse

 

Kannst Du die Datei konvertieren?

Gruss Stefan

 

\@SNowack

Hier die Acc2000-Version

Weiss allerdings nicht ob es mit 2000 funktioniert, da ich ADO 2.7 verwende.

 

*wink.gif* Klappt! Sieht gut aus

 

Vielleicht hilft auch dieser Ansatz bei der einen oder anderen speziellen Aufgabenstellung:

 

Hallo,

ich habe dein Beispiel mehrmals angesehen und versucht es anzupassen, stoße allerdings auf Verständnisprobleme bzgl. des Codes.
Das ganze ist eigentlich noch eine Nummer zu hoch für mich, sodass ich es nur schwer nachvollziehen kann.
Aber dennoch möchte ich dein Beispiel nochmal intensiver anschauen, benötige dazu nochmals Hilfe.

Problem:
Ich habe dein Beispiel insofern angepasst, dass ich nun ein breiteres Textfeld habe. In den Tabellendaten habe ich nichts geändert, auch nicht im Code.
Nun stimmen jedoch die Höhen der Textfelder / Ufos nicht mehr mit dem Inhalt überein, sie sind größer als sie sein sollten.
Ich finde nun jedoch nicht das Problem, vor allem da ich den Code nur schwer verstehe (Klassen, Variablen ......).

Grüße

 

Anhang

 

sfrTelNummern_SF_TelNummer:
Code:

Die Konstante conMaxChr ist eine Annäherung an die Zeichen, die pro Zeile möglich sind, bevor umgebrochen wird. (Hängt von der Schriftart ab.)

Besser wäre hier auf jeden Fall die reale Textbreite zu bestimmen. Das war/ist mir für dieses Spiel-Beispiel aber zu viel Aufwand nach einer Möglichkeit zu suchen, daher setze ich einfach eine Konstante ein. *wink.gif*

 

sehr gut, dankeschön *Smilie !

bzgl. der realen breite gibt es ja beispiele von lebans.com und hier aus dem forum (sascha trowitzsch meine ich ?), die dann auch die schriftart und schriftgröße berücksichtigen

dann schaue ich mal wie dein vorschlag ist, wenn ich das für ein endlosformular mit mehreren textfeldern anzupassen versuche.

grüße

 

Hi, die effektive Höhe/Breite kann man etwas mühsam mit einem Reportobjekt oder einfacher, mit dem PrinterObjekt aus VB6 herausfinden. Habe mir dazu mal eine Mini-DLL geschrieben. Berücksichtigt Schriftart, Fett, Kursiv, Höhe, Breite usw. halt alles was man dem PrinterObjekt übergeben kann um etwas auszudrucken was nicht innerhalb Controls steht. Falls interesse besteht, lade ich die gerne mal hoch denke aber, Lebans hat das auch damit gemacht, aber keine Ahnung, da nicht gefunden als ich das gesucht habe.