Deutsches Lazarusforum

Synapse enthält auch eine Unit für Open SSL

http://synapse.ararat.cz/doc/help/ssl_openssl.html

MmVisual hat geschrieben:Ich progge schon fast 30 Jahre und diese (scheiß) Strings sind mir schon immer ein Dorn im Auge.

Ich programmiere auch schon fast 30 Jahre (seit 1984 und ab TP3 mit Pascal) und die Strings haben mich noch nie gestört

Wenn das zweite if...then weg ist, werden aber alle Untereinträge im Memo aufgenommen. Bei dem Quelltext von Carina dürften aber auch nur Einträge gefunden werden, die NUR das gesuchte Wort enthalten. Beim Vergleich mit = müssen beide Seiten exakt gleich sein, um gefunden zu werden. Deswegen sollte ...

Mit break wird die Schleife beendet. Wenn Du anstatt break die Werte beispielsweise in ein Memo einträgst, bekommst Du die Treffer dort angezeigt. for i := 0 ListView1.Items.Count-1 do begin if ListView1.Items[i].Caption=Edit1.Text then Memo1.Lines.Add(ListView1.Items[i].Caption); for a := 0...

Mein Windows7 ist 64bit, Lazarus/FPC jedoch 32bit. Demnach nimmt ein integer bei mir 4 Byte ein. Das hört sich jetzt so an, als sein Integer nur 4 Byte weil Dein Lazarus mit 32 Bit arbeitet und es 8 Byte wären, wenn Lazarus 64 Bit hätte. Dies ist aber nicht der Fall. Auf Debian64 mit Lazarus64 verb...

Gut

mark332 hat geschrieben:4. Ja, ich verstehe meinen Code selbst, aber ich behaupte nicht, dass andere da Durchblick haben

Das ist aber spätestens dann ein Problem, wenn man Hilfe von den Anderen braucht. Ein halbwegs aufgeräumter Quelltext ist da wirklich sehr hilfreich

Jo, wäre aber auch gemein, eine Lösung per PM zu schicken wenn die Frage im Forum gestellt wird Zu Deiner PM kann ich nur sagen, nehme es nicht zu leicht. Auch ohne Adminrechte kann man eine Menge Unfug anstellen, für die Du dann gerade stehen mußt. Und die Daten waren lange genug sichtbar Zumindest...

Ich habe Dir gerade eine PM geschickt. Weiß aber nicht, ob Du die auch bekommst, da sie im Ordner "Postausgang" verbleibt und nicht unter "Gesendete Nachrichten" erscheint. Kenne mich mit den PMs hier im Forum nicht aus und weiß nicht, ob "gesendet" eher "hat empfa...

'kapazität' enthält hält noch ein Umlaut Nachtrag: Oh, jetzt nicht mehr Noch ein Nachtrag: "aktbelegung INTEGER NOT NULL;" - zum Schluß fehlt eine Klammer vor dem Semikolon Noch ein weiterer Nachtrag: Je öfter man draufschaut, desto mehr Fehler sieht man. Es muß auch AUTO_INCREMENT und nic...

Einstellungen - Editor - Vervollständigung/Hinweise

Wenn es Dir nur um die Parameteranzeige geht, kannst Du auch einfach mit der Maus über einen Bezeichner stehen bleiben. Kurz darauf werden Dir dann im Hint die Parameter und so weiter angezeigt. Wie schnell das angezeigt wird, kannst Du in den Einstellungen bestimmen.

Ich glaube man kann das über RangeStart und RangeEnd von THTTPSend regeln. Habe ich aber noch nicht ausprobiert.

http://synapse.ararat.cz/doc/help/httpsend.THTTPSend.html#RangeStart

FtpGetFile ist nicht für den Download mehrerer Dateien gedacht. TFTPSend (was von FtpGetFile genutzt wird) gibt auch Booleanwerte zurück. Darüber hinaus wird auch der Status mitgeliefert, was bei FtpGetFile/FtpPutFile nicht der Fall ist. Außerdem kann die Übertragung verschlüsselt werden (soweit der...

Das es sich um einen String handeln sollte, ist schon klar. Aber warum es bei Dir funktioniert ist nicht klar. Ich bezweifele sogar, daß es kontrolliert funktioniert. Wenn Du diese Prozedur aufrufst: procedure test; var agrid:integer; begin writeln('Schleife mit ''A+IntToStr(agrid)'''); for ...

Diese Variante wäre auch nicht schlecht: gridname:='A'+IntToStr(agrid); (man beachte die Wanderung des Anführungszeichens)

Wenn Du gridname:='A+IntToStr(agrid)'; schreibst, wird gridname immer exakt 'A+IntToStr(agrid)' sein und nicht 'A1' und so weiter.