PDA

Visualizza la versione completa : [Delphi] Mid di VB?


jabjoint
11-09-2002, 19:57
Qual' è la funzione di Delphi che corrisponde al MID di "VB"?

piccaweb
11-09-2002, 21:15
Spiega brevemente lo scopo della funzione e vedo se posso risponderti!

Dennis
11-09-2002, 21:37
mid(stringa,LUNGHEZZA)

tipo: text1.text=CIAO

mid(text1.text,2)

restituisce CI

AR64S-H
11-09-2002, 23:38
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
:ciauz:

alka
12-09-2002, 04:30
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! :ciauz:

jabjoint
12-09-2002, 15:23
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
12-09-2002, 15:24
unit Unit1;

interface

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


Ho sbagliato?

alka
12-09-2002, 15:30
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! :ciauz:

jabjoint
12-09-2002, 16:34
ops ... (3.0) ....

alka
12-09-2002, 16:39
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! :ciauz:

Loading