OBS/Adminhilfe/RTF: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Für diese Seite wurde eine Zugriffsbeschränkung eingerichtet. Falls du diese Nachricht siehst, bist du nicht berechtigt, diese Seite einzusehen.
Böhrer (Diskussion | Beiträge) |
Böhrer (Diskussion | Beiträge) Keine Bearbeitungszusammenfassung |
||
| Zeile 14: | Zeile 14: | ||
nRTFCharCount : integer; | nRTFCharCount : integer; | ||
</source> | </source> | ||
---- | |||
Nach | Nach | ||
// KOPFTEXT ANFANG | // KOPFTEXT ANFANG | ||
| Zeile 28: | Zeile 28: | ||
end; | end; | ||
</source> | </source> | ||
---- | |||
Nach | Nach | ||
procedure Positionen(); | procedure Positionen(); | ||
| Zeile 37: | Zeile 37: | ||
nLMemo : Integer; | nLMemo : Integer; | ||
</source> | </source> | ||
---- | |||
Nach | Nach | ||
cWelcheZeile := Token(cWWI,'|',3); | cWelcheZeile := Token(cWWI,'|',3); | ||
| Zeile 44: | Zeile 44: | ||
nLMemo := 0; | nLMemo := 0; | ||
</source> | </source> | ||
---- | |||
Nach | Nach | ||
cBuffer := AZ_Query.FieldByName('az_memofeld').asString; | cBuffer := AZ_Query.FieldByName('az_memofeld').asString; | ||
| Zeile 63: | Zeile 63: | ||
</source> | </source> | ||
Wiederholen, bis alle az_memofeld-Benutzungen (3x) in Positionen so umgestellt sind. | Wiederholen, bis alle az_memofeld-Benutzungen (3x) in Positionen so umgestellt sind. | ||
---- | |||
In Positionen am ende des Cases einen neuen Punkt | In Positionen am ende des Cases einen neuen Punkt | ||
<source lang="delphi"> | <source lang="delphi"> | ||
| Zeile 72: | Zeile 73: | ||
</source> | </source> | ||
hinzufügen. | hinzufügen. | ||
---- | |||
Suche | Suche | ||
TextFuss(); | TextFuss(); | ||
Version vom 19. Oktober 2011, 15:12 Uhr
Dies ist eine zugriffsgeschützte Seite.
FAQ
- System Überwachung
- DEP deaktivieren
- Darstellung unter Windows 7
- Einwahl auf Windows 2000 Server
- Preislisten
- Datenbank Sicherung
- Customize
- Zentrale
- Support Macro
- Service Debug
- Historienprotokoll (Datenänderung OBS)
- Fernwartungsprobleme
- Startparameter
- Fehler beim Kassenabschluss
- Diverse Informationen
Häufige Fehler FAQs
Allgemeines
Wiki Hilfe
Syntax
Wiki-Gruppen Benutzerlisten
MySQL
Programmierung und Mergen
Delphi
Einrichtung
Git/SmartGit
Programm Update
PAX
Nützliche Funktionen
SteVe
OBS-Administration / Installation
Einrichtung
MySQL
Dienste
Kasse/Notfallkasse
Replikation
Zentrale
Fleet-Management einrichten
OBS Umzug
Admin Funktionen
Service Firmen
F10
- A ras.pbk
- B Command Line Interpreter
- C File Zilla Benutzer XML erzeugen
- D1 OBS_UPDATE.EXE zum OBS Update Server hochladen
- D2 SUPPORT_MACRO zum OBS Update Server hochladen
- H1 Remote Service Protokoll-Übersicht (Alles)
- H Remote ServiceProtokoll-Übersicht
- I Remote Service Commands
- I1 (Admin) Globaler Hinweis für Updates
- J Liste der OBS Updates
- K Angemeldete Service Firmen
- L Systeminformationen einlesen
- M Kundendaten anzeigen
- M1 Kundendatenbankinformationen anzeigen
- N Kundendaten einlesen
- O Kunden-Update Informationen anzeigen
- P Modul Registrierung OBS
- Q App Verwaltung
- S1 Firmen Statistik Protokolle OBS
- S2 Statistik Notfallkassen
O Support
D Programmierer-Tools
V Crypt Autologin Edit
J Update Marko Lib/Pmode/Script Lib
kundenspezifische Anpassungen
OBS Protokolle
OBS DEMO
Shop-Administration
modified eCommerce
modified eCommerce 2.x
modified eCommerce 1.06
Amazon
VShop 4.0
Kundeninformationen
Umstellung auf RTF
Was ist zu tun?
- PMode 916 auf Ja stellen
- Drucke für RTF anpassen
- Kontrollieren ob die Wörterbuchdateien (Datei:DICT.ZIP) im Verzeichnis (obs\data\DICT\) liegen
Druckanpassungen
In den vars hinzufügen (Vorbildprint nur wenn auch Bilder ausgedruckt werden sollen):
vorbildprint : String;
nRTFStart : integer;
nRTFCharCount : integer;
Nach
// KOPFTEXT ANFANG
suchen und den Abschnitt durch folgendes ersetzen:
if (lKopfFuss) then begin
cBuffer := A_Query.FieldByName('a_kopftext').asString;
if (not empty(Alltrim(cbuffer))) then begin
LangtextDruck(cBuffer,'posnr',cResultVor);
Inc(y,0.5);
cBuffer := '';
end;
end;
Nach
procedure Positionen();
suchen und in den Vars einfügen:
nAnzCharDruck : Integer;
cRTFOrg : String;
nLMemo : Integer;
Nach
cWelcheZeile := Token(cWWI,'|',3);
Suchen, danach hinzufügen:
nLMemo := 0;
Nach
cBuffer := AZ_Query.FieldByName('az_memofeld').asString;
in Positionen(); suchen und alles was in nachfolgendem IF vorkommt ersetzen mit:
if (not empty(cBuffer)) then begin
if (empty (cResultvor)) then begin
inc(y);
end;
if PositionLangtextDruck(cBuffer,nWelcheZeile,cWo,cWelcheZeile,cResultVor,RTF_LANGTEXT) then begin
break;
end;
Dec(y);
end;
if (y >= iSeitenlaenge -iFusszeilen) then begin
break;
end;
Wiederholen, bis alle az_memofeld-Benutzungen (3x) in Positionen so umgestellt sind.
In Positionen am ende des Cases einen neuen Punkt
17 : begin
if Pagebreak(cWo,cResultvor) then begin
break;
end;
end;
hinzufügen.
Suche
TextFuss();
Ersetzen durch
TextFussRich();