[UPDATE] @Karl-Heinz - http://kh-rademacher.de/4d/ChangeNameInArticleList_include.html

11/01/2009 - 15:17 von Hermann Hippen | Report spam
Moin Moin :-),

Betrifft:
<http://kh-rademacher.de/4d/ChangeNa...e.html>

| - Umgestellt auf relative Pfadnamen.
| - Keine Einstellungen mehr nötig.
| - Paint_Names.ini für effektiveren Zugriff angepasst.
| (Siehe Beispiel unten)
| - Paint_Names.ini muss sich im Dialog Hauptverzeichnis befinden.
| - Überflüssigen Code entsorgt.
| - Verbliebenen Code optimiert.

Hier das neue Script:
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

8<-[ ChangeNameInArticleList_include ]->8
Function Change_Name_In_ArticleList (PS: WideString): WideString;
Var i : Integer; N : TStringList;
Begin
Try
i := 0; N := TStringlist.Create;
N.LoadFromFile('Paint_Names.ini');
Repeat
If (Pos( N.Names[i], PS )>0) Then
PS := StringReplace(PS, N.Names[i],Trim(N.Values[N.Names[i]]),[]);
i := i + 1;
Until i = N.Count-1;
Finally
N.Free;
End;
Result := PS;
End;
8<->8


und hier die Demo, wie das neue Paint_Names.ini auszusehen hat:


8<--[ Paint_Names.ini ]-->8
; File: Paint_Names.ini - Autor : Thomas Barghahn - Datum : 2008/04/05
;
; Name(n) àndern und oder ersetzen - Change name(s), replace name(s)
;
; Beispiel - Example:
; Thomas Barghahn=Tommy :-)

Hermann Hippen=Scriptwerkstatt
Maik Prinz=Maik
Enrico Bauer=Enrico
Karl-Heinz Rademacher=Raady
Dietmar Vollmeier=DiDi
8<-->8

Cu,
Hermann Hippen.
ž' š°º€ø?žžžžž?ø€º°š 'ž
ø€º° '<http://4ds.siteboard.eu>' °º€ø
'ž '40tude-Dialog Scriptwerkstatt' ž'
ø€º°' ž ž ø€º°ššššššš°º€øšž ž '°º€ø
 

Lesen sie die antworten

#1 Reinhard Irmer
11/01/2009 - 16:18 | Warnen spam
Hallo *hipper Hermann*,

*_Hermann Hippen_* schrieb:
Moin Moin :-),
Betrifft:
<http://kh-rademacher.de/4d/ChangeNa...e.html>
| - Umgestellt auf relative Pfadnamen.
| - Keine Einstellungen mehr nötig.
| - Paint_Names.ini für effektiveren Zugriff angepasst.
| (Siehe Beispiel unten)

| - Paint_Names.ini muss sich im Dialog Hauptverzeichnis befinden



und die Kommata sind dort durch IstGleich-Zeichen zu ersetzen, z.B.
alt: Karl-Heinz Rademacher,Raady
neu: Karl-Heinz Rademacher=Raady

[...]

Viele Gruesse
Reinhard

,--[ *wallalaweiala* ]-.
[ woge du Welle,...auf der ]
[ Hamster-Spielwiese vr1.25.2.0 ]
`-Ž

Ähnliche fragen