for i := 1 to SL1.Count-1 do begin SL2.Clear; ExtractStrings([';'],[],PChar(SL1[i]),SL2); if StrComp(PChar(SL2[0]),PChar(FrmCAM.ComboBox2.Text)) = 0 then begin edit1.text := SL2[1]; edit2.text := SL2[2]; edit3.text := SL2[3]; break; end; end;
SL1.Free; SL2.Free;
Screen.Cursor := crDefault; end;
Kan jeg lokke dig til at oversaette det til C++, da jeg bare skal videre med projektet...? Point kan forhoejes, hvis noedvendigt.
Der ser spaendende ud. Kan du kommentere koden, säledes at jeg ved, hvad jeg skal i gang med... Jeg gär ud fra, at den er skrevet som konsol, hvilket jeg ikke bruger.
Et generelt spörgsmäl (til alle, som läser dette): Til hvilke applikationer anvender man i dag konsol programmer? Jeg synes aldrig, man stöder pä andet end ganske "normale" Windows programmer i dagligdagen (vinduer med buttons, edits osv.), sä derfor ville det väre rart at höre, hvor konsol programmer i dag anvendes.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.