AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte XP Usermanagers 6.1 Open Source

XP Usermanagers 6.1 Open Source

Ein Thema von Luckie · begonnen am 24. Okt 2004 · letzter Beitrag vom 4. Feb 2020
Antwort Antwort
Seite 1 von 2  1 2   
Delphi-Laie

Registriert seit: 25. Nov 2005
1.474 Beiträge
 
Delphi 10.1 Berlin Starter
 
#1

AW: XP Usermanagers 6.1 Vollversion

  Alt 6. Aug 2017, 20:43
Behandelt mein Baby gut, wenn ihr die Sourcen benutzt oder einfach nur nachguckt, wie ich damals was gelöst habe. Ich weiß gar nicht mehr mit welcher Delphi Version er kompiliert. D7?
Das ließ mir keine Ruhe, weil Delphi 4-7 doch recht ähnlich sind. Heute nun (nach meinem Sommerurlaub) kam ich endlich dazu, das zu ermitteln.

Also, bis hinab zu Delphi 6 compiliert es, und zwar ohne irgendein Gemoser.

Die ersten Probleme traten bei Delphi 5 auf. Mit geringfügigen Änderungen, die hoffentlich die Funktionalität des Compilates nicht beeinträchtigen (ggf. kann man auch etwas anderes auskommentieren, nimmt man z.B. statt string besser widestring?), compiliert es auch mit Delphi 5.

Mit nochmals geringfügigen Änderungen, ebenfalls hoffentlich nicht allzusehr für die Funktionalität relevanten, compilert es sogar bis Delphi 4 hinab.

Nur mit Delphi 3 hat man definitiv keine Chance mehr.

Ergebnis: Noch weiter reduzierte Exe-Dateigrößen. Das müßte doch besonders Dein Herz erwärmen, Michael, nicht wahr? (Tut es bei mir jedenfalls.)

Allerdings komme ich an Deine Zauber"größe" nimmer heran: Dein (letzter?) XP Usermanager hat nur 81,5 kByte. Meine Ergebnisse hingegen sind mit:

Delphi 7: 236 kByte
Delphi 6: 234 kByte
Delphi 5: 190 kByte
Delphi 4: 188 kByte.

Wie machst Du das bloß?

Gruß Delphi-Laie
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 00:13
Du musst die Quellcodes ausdrucken. Dann auf Vollmond warten und in einem Hexenkreis verbrennen. Aber nicht vergessen, vorher mit Krötenblut, Fliegendreck und Schneckenschleim beträufeln. Und vergess um Himmelswillen das Jungfrauenblut nicht! Das Jungfrauenblut! Vergess das bloss nicht! Aber die geheimen Beschwörungsformeln musst du selber herausfinden. Kleiner Tipp sie fangen an mir: "Hinweg du böse VCL. Hinweg und in das Feuer mit dir. Geheiligt sei die reine WinAPI. Gepriesen seien Kernigen und Ritchie auf deren Sprache Windows basiert." Und vergess das Tanzen nicht. Du musst um den ausgedrucken Quellcode tanzen und hüpfen! Ich habe schon zu viel gesagt.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Delphi-Laie

Registriert seit: 25. Nov 2005
1.474 Beiträge
 
Delphi 10.1 Berlin Starter
 
#3

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 00:38
Naja, verbannt/verhext dieses Dein (doch wohl VCL-freies) Projekt nicht automatisch die VCL und beschwört stattdessen die API? Ich weiß, daß ich zuviel frage, aber so richtig schlau wurde ich aus diesen Deinen Zaubersprüchen nicht. Oder bist Du etwa wie das Orakel von Delphi zu befragen und zu interpretieren?
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 04:22
Der Großteil wurde mit Delphi 7 entwickelt. Unter dem BDS 2006 wurden nur noch kleinere Anpassungen vorgenommen. Unter anderem das Schreiben in die Registry unter 64-Bit. Ich habe keine Ahnung warum deine Compilate größer sind. Ach ja. Pack es noch mal mit UPX, vielleicht kommst du ja dann auf meine Exe Größen. Aber das Jungfrauen Blut. Das Jungfrauen Blut! Mann, dass darfst du nicht vergessen!
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#5

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 04:59
Oh. Sorry, Ich habe noch was vergessen. Bill Gates stand immer hinter mir, wenn ich in der IDE F9 gedrückt oder meine Batch zum Kompilieren gestartet habe.

Was ich sagen will, hängt euch nicht an der Exe Größe auf. Ich habe keine Ahnung wie ich sie so klein bekommen habe. D7 mit UPX wahrscheinlich.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#6

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 05:10
Und frag ruhig. Würdest du in der Nähe wohnen, würde ich es in deiner Anwesenheit bei einem Bier kompilieren. Ich weiß nur nicht, ob meine Batch von damals es noch machen würde. Ich glaube, ich habe kein UPX mehr installiert bzw. im Suchpfad. Guckt mal, ob ihr es mit der Batch kompilieren könnt. Der Delphi Konsolen Compiler und und UPX müssen im Suchpfad liegen und die Pfade in der Batch müssen stimmen.

Müsste aber alles in dem Zip Archiv mit den Sourcen sein. Und wenn es so nach Github hochgeladen wurde, auch von da alles in einem Paket runter ladbar sein.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
10.018 Beiträge
 
Delphi 12 Athens
 
#7

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 05:38
Müsste aber alles in dem Zip Archiv mit den Sourcen sein. Und wenn es so nach Github hochgeladen wurde, auch von da alles in einem Paket runter ladbar sein.
Ist auch drin, aber da dort noch die dcc32.exe zum Kompilieren verwendet wird, funktioniert es mit neueren Delphiversionen erst einmal nicht.

Sollte ich dazu kommen, ziehe ich vielleicht mal meinen Batch Compiler auf eine neue Version hoch und binde den ein... dann würde es mit allen Versionen gehen.
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat
Delphi-Laie

Registriert seit: 25. Nov 2005
1.474 Beiträge
 
Delphi 10.1 Berlin Starter
 
#8

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 09:52
Ach ja. Pack es noch mal mit UPX, vielleicht kommst du ja dann auf meine Exe Größen. [...] D7 mit UPX wahrscheinlich.
In der Tat beansprucht Dein Usermanager geringfügig mehr Speicher als meiner. Das ist ein Hinweis auf UPX. Also mit der neuesten Version 3.94 und der Maximalkompression "-9" komprimiert. Es ergaben sich folgende Dateigrößen der Compilate, die ursprünglich kreiert wurden mit Delphi Nr.:

7: 80 kByte
6: 80 kByte (genau gleichgroß wie sein Vorgänger)
5: 61 kByte
4: 60 kByte

Ich wußte bis dato gar nicht, daß man mit UPX so gut packen und der Speicherbedarfszuwachs hingegen so moderat ist, bisher nahm ich dessen Komprimate anders wahr. Wer fühlt sich nun herausgefordert, den Usermanager noch kleiner zu bekommen?

Fasse ich also zuammmen, Luckie kocht nicht mit Wasser, sondern immerhin mit Jungfrauen- und Krötenblut sowie Schneckenschleim.

Was ich sagen will, hängt euch nicht an der Exe Größe auf.
Naja, wer schwärmt denn vom entscheidenden Vorteil, den die Non-VCL-Programmierung mit sich bringt?
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#9

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 11:00
Die Frage die da wäre was nennst du maximal?
Das ist maximal...

Zitat:
@echo off
set _upx="upx394.exe"
set Params= --ultra-brute --no-backup
%_upx% %Params% "Deine.exe"
pause
12 fach bei 64Bit
72 fach bei 32Bit

Zitat:
Naja, wer schwärmt denn vom entscheidenden Vorteil, den die Non-VCL-Programmierung mit sich bringt?
Hat nix mit schwärmen zu tun sondern damit das sehr viel unnützer kram mit eingebunden wird.

meine(unsere) DLL habe ich von 4MB auf 750KB runtergeschraubt.. daran kannst du das schon sehen.
Und ja sie läuft sehr gut sogar nach den ganzen Fehler Beseitigungen.

gruss

Geändert von EWeiss ( 7. Aug 2017 um 11:07 Uhr)
  Mit Zitat antworten Zitat
Delphi-Laie

Registriert seit: 25. Nov 2005
1.474 Beiträge
 
Delphi 10.1 Berlin Starter
 
#10

AW: XP Usermanagers 6.1 Open Source

  Alt 7. Aug 2017, 15:20
Die Frage die da wäre was nennst du maximal?
Das ist maximal...

Zitat:
@echo off
set _upx="upx394.exe"
set Params= --ultra-brute --no-backup
%_upx% %Params% "Deine.exe"
pause
12 fach bei 64Bit
72 fach bei 32Bit
In der Tat, das kannte ich noch nicht und komprimiert noch etwas besser, danke!

Die Größen sind nunmehr nur noch 76, 75, 58 und 57 kByte.

Der Punkt geht klar an Dich!
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:49 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz