Forum: Sonstige Fragen zu Delphi
by himitsu,
26. Okt 2009
und hier machst du JEDESMAL EINE PAUSE VON 100 ms
start := gettickcount;
repeat
stop := gettickcount;
application.processmessages;
until (stop - start ) >= 100;
und nicht ALLE 100 ms
start := gettickcount;
{schleifenstart}
Forum: Sonstige Fragen zu Delphi
by himitsu,
26. Okt 2009
hast du den Tipp auf BeginUpdate/EndUpdate beachtet?
Forum: Sonstige Fragen zu Delphi
by himitsu,
25. Okt 2009
Das Application.ProcessMessages mach ich nie von einer Anzahl mit unbestimmter Zeiabhängig.
Dafür merke ich mir die Startzeit (GetTickCount) und führe dann alle x Millisekunden (100 bis 200) dieses aus.
Dort kann man dann auch mitbekommen, ob sich die Startbedingung geändert hat und beginnt die Suche von Neuem.
Abgesehn davon würde ich diese Liste noch parallel mit einer Index-Hashliste...
Forum: Sonstige Fragen zu Delphi
by himitsu,
25. Okt 2009
Was sind ListeD und ListeE eigentlich?
Womöglich sollte man da man über BeginUpdate/EndUpdate nachdenken.
Forum: Sonstige Fragen zu Delphi
by himitsu,
25. Okt 2009
Soviele Kommentare sind nicht grad übersichlich und verbessern die Lesbarkeit des Codes nicht wirklich
for i2:=1 to {Länge der aktuellen Zeile i} do
begin
if {Das i2-te Zeichen aus der aktuellen Zeile}=(':') then
Kennst du schon Pos?
Und warum läßt du diese Datei nicht einfach so, wie sie ist?
Forum: Sonstige Fragen zu Delphi
by himitsu,
24. Okt 2009
Vermutlich hatte er die Datei nur mit'm Notepad geöffnet und in der Datei sind nur Linux-Umbrüche (#10) drin, welcher der Notepad (und auch andere "Editoren") nicht versteht.
Forum: Sonstige Fragen zu Delphi
by himitsu,
23. Okt 2009
für
Deutsch1=Englisch1
Deutsch2=Englisch2
...
kann man ganz einfach eine TStringList nehmen
.Name und .Value
auch für diese
Deutsch1
Englisch1