Autor Beitrag
Listing
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 24



BeitragVerfasst: Fr 26.01.07 19:30 
Hi,

ich möchte ein kleines Delphi Programm schreiben
(bei 20kb) nur das geht nicht mehr wenn ich SysUtils verwende
(verdoppelt die filesize!?!) dabei will ich nur einen Null-terminierten
String in meine Applikation laden -.-

Ich vermute dass ich das nicht einfach per GetProcAdress holen kann,
weil es so 'ne Delphi Mischfunktion ist *grr*

Gibt es ne Methode wie ich meinen Pointer in meinem String speichern kann?

ausblenden Delphi-Quelltext
1:
MyStr := StrPas(Buf);					


Danke schonmal
Grenzgaenger
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Fr 26.01.07 21:56 
was willst denn mit dem code machen? 'n virus schreiben?
Listing Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 24



BeitragVerfasst: Fr 26.01.07 23:45 
user profile iconGrenzgaenger hat folgendes geschrieben:
was willst denn mit dem code machen? 'n virus schreiben?

Dir ist es anscheinend egal wie groß deine Dateien sind !?
-.- Typisch Delphi programmierer
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Sa 27.01.07 00:20 
Was ist Buf für ein Datentyp? ein PChar? Dann kann man es einfach zu weisen. Und wenn man es sauber machen will, dann castes man es nach String.
Listing Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 24



BeitragVerfasst: Sa 27.01.07 20:09 
user profile iconLuckie hat folgendes geschrieben:
Was ist Buf für ein Datentyp? ein PChar? Dann kann man es einfach zu weisen. Und wenn man es sauber machen will, dann castes man es nach String.

Buf ist ein Pointer
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Sa 27.01.07 20:55 
Du weißt aber schon wie der Quelltext von StrPas aussieht?
Zitat:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
function StrPas(const Str: PChar): string;
begin
  Result := Str;
end;

:rofl:
Listing Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 24



BeitragVerfasst: Sa 27.01.07 22:27 
user profile iconjaenicke hat folgendes geschrieben:
Du weißt aber schon wie der Quelltext von StrPas aussieht?
Zitat:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
function StrPas(const Str: PChar): string;
begin
  Result := Str;
end;

:rofl:

Danke genau das hab ich gebraucht
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: So 28.01.07 14:44 
Du hast es, glaube ich nicht, verstanden. Die Funktion StrPas macht...gar nichts. Du brauchst sie also nicht und kannst deinen Zeiger auf eine Zeichenkette direkt zuweisen.