[Delphi] Mid di VB?

[jabjoint]

Qual' è la funzione di Delphi che corrisponde al MID di "VB"?

[piccaweb]

Spiega brevemente lo scopo della funzione e vedo se posso risponderti!

[Dennis]

mid(stringa,LUNGHEZZA)

tipo: text1.text=CIAO

mid(text1.text,2)

restituisce CI

[AR64S-H]

In Delphi devi usare MidStr.
Per usarlo devi inserire nella clausola uses la unit StrUtils
Ti faccio un esempio per farti capire meglio

procedure TForm1.Button1Click(Sender: TObject);
var s,t:string;
begin
s:='CIao';
t:=midstr(s,1,2);
Label1.caption:=t;
end;

Dopo MidStr si inserisce il nome della stringa e il valore dal quale cominciare a leggere e infine il valore finale della lettura.
Credo che anche mid in VB lavori così vero?
Questo mio esempio ti ritorna la stringa Ci nel cption del label
Ciao

[alka]

Sì, MidStr viene fornita proprio al solo scopo di aiutare i programmatori che provengono da Visual Basic...in realtà, internamente, la MidStr richiama la funzione Copy, più largamente utilizzata dai programmatori Delphi, che incorpora anche le funzionalità delle Left e Right presenti in VB.

Ciao!

[jabjoint]

Grazie mille a tutti.
Il problema è che non mi và!Ho messo sotto uses "StrUtils" e poi ho copiato il codice ma mi da errore su "strUtils"

[jabjoint]

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, StrUtils;


Ho sbagliato?

[alka]

Suggerisco di usare la funzione Copy quando possibile.

In ogni caso, che versione di Delphi stai utilizzando?
La funzione MidStr è disponibile dalla 6 in poi.

Ciao!

[jabjoint]

ops ... (3.0) ....

[alka]

Quindi, usa la funzione Copy!
Con quella puoi fare tutto ciò che vuoi.
Consulta la Guida in linea di Delphi per ottenere maggiori informazioni.

Ciao!